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ATTENTION USERS OF THE NORTH STAR ZPB-2A PROCESSOR BOARD 



WRITE DATA RACE CONDITION 

A race condition exists in the write data logic of the ZPB- 
2A CPU board which can interfere with the operation of other 
boards on the S-100 bus if these boards utilize an internal bi- 
directional data bus. The following modification will alleviate 
this problem without degrading the performance of the North Star 
CPU or any other known device sharing the bus. 

Locate IC 7F . It is a 74LS132 in the upper left section of 
the ZPB circuit board. Remove this chip from its socket, bend 
out pin 10 and replace the IC in its socket in such a way that 
pin 10 sticks out without making contact with its assigned socket 
hole or with any other component. Make sure that the chip is 
oriented correctly when it is replaced. Pin 10 should be 
pointing toward the top of the board. This completes the 
modification. 



User's Manual 

tm 
DISK JOCKEY 2/D 

INTRODUCTION 

The Thinker Toys DISK JOCKEY 2/D (DJ) board features three 
distinct subsections: 

1. A floppy disk controller, capable of reading and writing 
data in either single density FM code or double density 
MFM code with write precompensation, which can be 
connected to any floppy disk drive plug compatible with 
the Shugart 800/850. 

2. A baud rate selectable hardware UART serial interface 
that allows communication with a terminal device at TTY 
20ma current loop or RS-232 levels. 

3. Automatic address generation upon reset or power-up which 
allows a "jump start" to the boot strap program in the 
ROM contained on the board. 

The DJ plugs into an S-100 bus slot in a system with an 8080, 
8085, or Z80 (1.7MHz - 5MHz) CPU. The controller has a cable 
connector for attaching a flat cable to the first floppy disk 
drive, and can control a chain of up to four drives daisy chained 
on this cable. A second connector on the DJ is provided for 
attatching a terminal device. 

The DJ uses memory mapped I/O. Device registers used to 
input from and output to the floppy disk and the serial port are 
accessed from the CPU board of the S-100 system by references to 
memory addresses. Some registers differ in function depending on 
whether they are being read or written. 

Most users will not wish to use the hardware level registers 
directly. Instead, they can call standard disk and serial I/O 
subroutines contained in 1016 bytes of PROM memory on the DJ 
board. This PROM occupies a 1024 byte block of S-100 bus memory 
address space. A 1024 byte RAM is also provided which is used by 
the PROM firmware for the storage of various disk related 
variables such as the current track number, the current drive 
number, etc. An exact map of these variables is included at the 
end of the PROM listings. The remainder of the RAM may be used 
as a disk data buffer or for general purpose memory. 

The actual addresses where the I/O registers, PROM, and RAM 
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appear are controlled by another PROM, referred to as the address 
selection PROM. The PROM is supplied with standard addresses 
burned into it for these registers. If the standard addresses 
would conflict with some other device on the system bus, a PROM 
burned with non-standard addresses can be substituted. 

The DISK JOCKEY 2/D uses 2048 bytes of memory starting at 
340:000 or E000H (standard version). The first 1016 bytes are 
occupied by PROM, the next 8 bytes constitute the memory mapped 
I/O, and the last 1024 bytes contain the RAM buffer. 



PROGRAMMING SPECIFICATIONS 



ROM JUMP TABLE 

Most users will wish to take advantage of the 
subroutines supplied in PROM on the DJ. 



standard I/O 



The user should branch to the appropriate address in a jump 

table in the first few words of the system ROM. Since each 

subroutine ends with a RET instruction, a CALL instruction should 
be used to branch to the subroutine. 



The jump table contains jump instructions to the true address 
of- the utility routines within the ROM. Having a jump table 
allows the individual routines to be updated and moved around 
within the ROM without having to change software that calls 
routines. Let A represent the address of word of the 
ROM. In boards with standard address 
340:000Q (E000H) . The 
are then: 



the 
onboard 
decoding PROMS, A = 
address to call for the utility routines 



ADDRESS 



STANDARD VALUE 



SYMBOLIC VALUE 



FUNCTION 



Octal Hex 

A 340:000 E000 DBOOT DOS bootstrap routine 

A+3 340:003 E003 TERMIN Serial input 

A+6 340:006 E006 TRMOUT Serial output 

A+9 340:011 E009 TKZERO Recalibrate (seek to TRK0) 

A+12 340:014 E00C TRKSET Seek 

A+15 340:017 E00F SETSEC Select sector 

A+18 3 40:022 E012 SETDMA Set DMA address 

A+21 340:025 E015 DREAD Read a sector of disk data 

A+24 340:030 E018 DWRITE Write a sector of disk data 

A+27 340:033 E01B SELDRV Select a disk drive 

A+30 340:036 E01E TPANIC Test for panic character 

A+33 340:041 E021 TSTAT Serial status input 

A+36 340:044 E024 DMAST Read current DMA address 

A+39 3 40:047 E027 STATUS Disk status input 

A+42 340:052 E02A DSKERR Loop to strobe error LED 

A+45 340:055 E02D SETDEN Set density 

A+48 340:060 E030 SETSID Set side for 2-headed drives 

The specific function of each subroutine is described below. 



The subroutine 
instruction. A disk 
return with the carry 
that detects an error 
set to 1. A program 
return from a disk 



upon completion will execute a RET 
subroutine that completes normally will 
flag cleared to zero. A disk subroutine 
condition will return with the carry flag 
should always test the carry flag after a 
utility subroutine and branch to an 



appropriate error handling routine if the carry flag is set. 
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SERIAL I/O 

There is a hardware UART on the DJ board along with a crystal 
controlled baud rate generator. There are sixteen different baud 
rates available including 12 of the most common. The baud rate 
of the UART must match the baud rate of the terminal connected to 
the DJ board in order for the serial interface to function 
properly. 

The UART (Universal Asynchronous Receiver-Transmitter) 
consists of two independent sections: a transmitter section and a 
receiver section. Each section has two registers. In the 
transmitter section one register is loaded by the system bus. 
The contents of this bus register are transferred to a shift 
register where start, stop, and (conditionally) parity bits are 
appended. The transmitted serial data originates from this shift 
register. Whenever the contents of the system bus register have 
been transferred to the second shift register the UART sets the 
TBRE (Transmitter Buffer Register Empty) bit in its status 
register. 

In the receiver section there is a shift register which 
assembles a parallel data word from the input serial stream after 
start and stop bits have been removed. When a complete data word 
has been assembled in this register it is loaded into a second 
register that is accessible from the system bus. Whenever this 
bus register is loaded from the receiver shift register the UART 
sets the DR (Data Ready) bit in its status register. 

The subroutine TERMIN can be called to wait for the UART to 
raise the DR bit of its status register. The character is then 
transferred to the A register and trimmed to seven bits. Reading 
the UART's data register automatically resets the DR bit. The 
TERMIN subroutine will not return until a character arrives. 

The subroutine TRMOUT causes the UART to transmit the data in 
the C register of the CPU. The TBRE bit of the UART's status 
register is tested. When TBRE is high, the contents of the C 
register is transferred to the UART's system bus register. This 
automatically resets the TBRE bit. The TRMOUT subroutine will 
wait for the TBRE bit to be high before transferring data to the 
UART.« 

The subroutine TPANIC can be called to detect the presence of 
a panic character in the serial input stream. TPANIC tests the 
DR bit of the UART's status register. When this bit is high, 
TPANIC calls the TERMIN subroutine and then compares the data 
from the UART with the contents of the C register. The ZERO flag 
of the CPU's FLAGS register is set upon completion of the TPANIC 
subroutine if the character in the C register has been struck on 
the terminal keyboard. 

The subroutine TSTAT can be called to test the condition of 
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the DR bit in the UART's status register. Upon completion, the 
ZERO flag of the CPU's FLAGS register is set if the DR bit is 
high. The subroutine does NOT reset the DR bit. 

DISK I/O 

To understand the significance of the disk utility 
subroutines, it is necessary to say a few words about how data is 
organized on the disk. 

Information on the disk is organized into 77 concentric 
tracks. The disk read/write head can be moved to any track by a 
series of step in or step out commands. A step in command moves 
the read/write head one track towards the center of the disk. A 
step out command moves the head one track away from the center of 
the disk. The numbering of the tracks is arranged so that track 
zero is the farthest from the center of the disk. One of the 
responsibilities of the Western Digital 1791 controller is to 
know the current track number over which the read/write head is 
located and to calculate how many step in or step out commands 
are necessary to move the head to a desired new track. 

Once the read/write head has been moved to the desired track, 
the rotation of the disk will move a circle of magnetic material 
beneath the head. Within this circle of material, data is 
recorded in distinct regions called sectors. The sector is the 
smallest amount of information that can be separately read from 
or written to the disk. There are three different sector formats 
that IBM currently supports. The table below details the 
relationship between the size of a sector and the number of 
sectors that can fit on a single track. 



bytes of data per sector sectors per track 



I SINGLE DENSITY 128 | 26 | 
1 256 | 15 | 
1 512 | 8 | 


I DOUBLE DENSITY 256 | 26 | 
i 512 | 15 | 
1 1024 | 8 | 



In the header field which preceeds the data field of a 
sector, the track number, the side, the sector number and the 
sector .length are recorded. During read or write commands, this 
header is read before data transfers take place. Whenever a seek 
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command is issued which causes the the read/write head to move to 
a new track the firmware on the DJ board performs a verify which 
reads this sector header to make sure the head is positioned 
correctly and to determine if there is any change in the sector 
length or the density of the recorded information. If there is 
an error as to the track number, the firmware automatically 
issues a seek to track zero command to position the head over a 
known track. 

The disk drive has a sensor that reports when the read/write 
head is physically positioned at track zero. A series of step 
out commands must be issued by the 1791 controller until this 
status line becomes active. This operation will always position 
the head to the same physical track. The seek to track zero 
command is often called a recalibrate command and is a standard 
utility subroutine supplied with the disk firmware. 

Transferring a sector of disk data between memory and the 
disk therefore involves the following steps, each corresponding 
to a subroutine call to the Disk Jockey firmware (with the 
exception of error checking): 

Specify the track number the read/write head should be 
positioned over during subsequent data transfers between 
the disk and memory. 

Check for error conditions. 

Specify the sector number that will be involved in 
subsequent data transfers between the disk and memory. 

Check for error conditions. 

Specify the starting memory address of block of data that 
is to be transfered to or form the disk. 

Check for error condition. 

Actually perform the read or write operation. 

Check for error conditions. 

ROM SUBROUTINES 

TRKSET - The value in the C register of the CPU specifies what 
track the read/write head will be positioned over when 
the next disk read or disk write operation is issued. A 
bounds check is made for a value greater than or equal 
to zero and less than or equal to 76. If the value in 
the C register is within these bounds, the contents of 
the C register is written into the RAM location, TRACK. 
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Otherwise no action is taken, the carry flag is set and 
the subroutine returns to the calling program. 

SECTOR - The value in the C register of the CPU specifies what 
sector will be involved in the next disk read or write 
operation. A bounds check is made for a value greater 
than or equal to 1 and less than or equal to 26. If the 
value the C register is within these bounds, the data in 
C is transfered the the RAM location SECTOR and a normal 
return is made. Otherwise no action is taken, the carry 
flag is set and the subroutine returns to the calling 
program. Just prior to a disk transfer operation a 
comparison is made between the value in SECTOR and the 
maximum number of sectors on the track that transfer is 
to take place on. If the value in SECTOR exceeds the 
maximum number of sectors, the transfer operation is 
aborted and error information is reported. 

SETDMA - During disk transfer operations blocks of data are moved 
to and from the disk. These blocks can be 128, 256, 
512, or 1024 bytes long. The starting address of a data 
block that will be involved in the next disk transfer 
operation is specified by the B-C register pair when the 
SETDMA subroutine is called. Since the disk registers 
are memory mapped, the firmware has been designed to try 
to protect them from being written into or read from 
during disk transfer operations. Accordingly, a bounds 
check is performed before the DMA address is recorded in 
the Disk Jockey RAM. If a 1024 byte data transfer to or 
from the disk would cause memory references to the I/O 
resgisters of the disk controller, the carry flag is set 
and the routine returns with no action taken. If the 
value of the B-C pair is such that there could not be 
any memory references to the last eight locations of the 
Disk Jockey ROM during a subsequent disk operation, the 
contents of the B-C pair are written into the memory 
location of the Disk Jockey RAM specified by the label 
DMAADR. The carry flag is cleared and the routine ends. 

SELDRV - The value of the C register determines which of 4 disk 
drives will be selected for the next disk transfer 
operation. A bounds check is performed on C. If the 
value in" C is greater than 3, the carry flag is set and 
the routine returns with no action taken. If the value 
in C is between zero and three, this data is written in 
the Disk Jockey RAM at the location specified by the 
label DISK. The carry flag is cleared and the routine 
returns to the calling program. 



SETSID - Double sided floppy disk drives 
heads so that information can be 
from both sides of the diskette. 



have two 
stored and 
The two 



read/write 

retrieved 

heads are 
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positioned so that they are both on the same track one 
directly below the other. They also share common 
read/write electronics. Therefore only one of these 
heads can be selected at a time. Bit of the C 
register is used to select which of the two heads on_ a 
double sided drive will be used during the next disk 
transfer operation. A zero in bit will select the 
bottom head and a 1 will select the top head. Selecting 
a side and selecting a disk are independent operations. 
If side zero is selected then regardless of the disk 
selected, side zero will always be accessed until SETSID 
is called. Finally, if the selected disk is single 
sided, side zero will always be selected regardless of 
the results of the SETSID routine. 

SETDEN - The 1791 Floppy Disk Controller operates in two modes: 
single density FM (Frequency Modulation) mode or double 
density MFM (Modified Frequency Modulation) mode. Bit 
of the C register determines what density the 1791 will 
be operating in when the next disk transfer operation is 
initiated. Care must be exercised in the use of this 
routine. Under certain circumstances, if the density is 
changed in between disk transfers on the same track, the 
micro-program that the 1791 controller executes could 
fall into an error loop that it could not recover from. 
In such a case the system would have to be reset before 
further disk operations could be performed. The density 
mode of the 1791 can safely be changed when a subsequent 
disk transfer operation will occur on a different track 
than the last. It should be noted that the firmware of 
the Disk Jockey has the ability to automatically set the 
density mode of the 1791. Whenever a new drive is to be 
selected or whenever the head is not loaded, the Disk 
Jockey firmware performs a "read header" operation just 
after positioning the read/write head (if necessary) and 
just before attempting to perform a disk transfer. This 
"read header" operation is used to establish the density 
of the (possibly new) track and to determine the length 
of the sectors on this track. If the density has not 
changed from the last "read header" operation or if the 
calling program has set the density correctly through 
the use of SETDEN, the process of reading the sector 
header is slightly faster (by approximately one and a 
half diskette revolutions) than it would be if the 
initial assumption concerning the density was wrong. 

TKZERO - This subroutine positions the read/write head to the 
outer-most track of the diskette: track 00. The track 
zero sensor is used to determine this positioning and no 
"read header" verify operation is performed. There are 
several side effects of positioning the head at track 
zero: (1) a flag is set in the Disk Jockey RAM to force 
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a "read header" density/position verify operation prior 
to the next disk transfer operation and {2} the mode of 
the 1791 controller will be forced to single density as 
long as disk transfer operations occur on track zero. 
All IBM compatible diskettes have track zero formatted 
in single density and condition (2) above relieves the 
system software of the burden of conditionally changing 
density every time the head is moved to track zero. If 
the rest of the disk is recorded in double density, the 
Disk Jockey firmware will automatically switch back to 
double density when the head is moved away from track 
zero without the intervention of external software. 

READ - This subroutine transfers information from the diskette 
to memory. The first task is to select the proper disk 
drive. If the new drive is not the same as the current 
drive, the load head time-out flag is set and the 
current drive is updated to be the new drive. Next, the 
"head loaded" flag is tested. If the head is not loaded 
or if the current drive was not the same as the new 
drive, the head load time-out flag is set. The firmware 
then merges the drive select bits with the head select 
bit and physically selects a drive, loads the head(s), 
and selects a side (if the drive is double sided). If 
the head load time-out bit is set, a 4 millesecond 
delay occurs to allow for the head to settle after 
loading. Next the "ready" line from the drive is 
tested. If the drive is not ready, the head is unloaded 
and the routine returns to the calling program with the 
carry bit set and an 80H in the A register. If the 
drive is ready, the head is positioned in accordance 
with the most recent seek operation. Head motion 
(including a head load) or a change of disk drive will 
cause the firmware to verify the track position by doing 
a "read header" operation. The correct density of the 
track is also determined during this operation and the 
density mode is changed if necessary. If the 1791 
controller cannot read the header information in either 
density, the head is moved to track zero, the carry is 
set, and the read operation is terminated with an 11H in 
the A register. If the head is correctly positioned, the 
size of the sectors on the current track is encoded in 
the Disk Jockey RAM. The firmware uses this information 
to find the value of the highest addressable sector. 
This value is compared to the that specified by the most 
recent set sector operation. If the desired sector has 
a value too large for the present track, the head is 
unloaded, the carry flag is set and the routine returns 
with a 10H in the A register. If the value is 
acceptable, the data from this sector is transfered to 
memory starting at the address specified by the most 
recent set DMA operation. The length of this transfer is 
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track, 
read i 
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proces 
regist 
is to 
condit 
status 



ined by the length of the sec 
The last two bytes of data o 
nto memory. These are the CRC 
ed to detect data transfer err 
ses these bytes and then 
er. The last operation that 
place the status information i 
ionally set the carry flag, 
bits are illustrated below. 



tors on the current 
n the sector are not 
check sum bytes and 
ors. The 1791 chip 
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n the A register and 
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"DREAD" REGISTER A ERROR BITS 



7 6 5 4 



NOT READY 



ILLEGAL SECTOR/RECORD NOT FOUND_ 



2 
I 







I I 



I I 



BAD DATA FORMAT 
"DATA REQUEST 
"LOST DATA 
~CRC ERROR 



DWRITE - The flow of logic for this routine is exactly the same 
as described above in the read data operation up to the 
point where the information transfer is to take place. 
If all the conditions for a data transfer as described 
above are satisfied, a write sector command is issued to 
the 1791 controller and information is transfered from 
memory to the disk drive starting at the memory address 
specified by the most recent DMA operation. This data 
is written on the sector specified by the most recent 
set sector operation and the head is positioned over the 
track specified by the most recent seek operation. As 
the controller writes data on the disk it is continually 
computing two CRC check sum bytes. After the last byte 
of data has been written on the diskette, the two check 
sum bytes are appended to the sector by the controller 
for later use when the sector is read back into memory. 
As with the read operation the controller updates its 
status register after the last CRC byte has been written 
on the diskette. These status bits are placed in the A 
register just before control is returned to the calling 
program. The carry flag is conditionally set from these 
bits. The details of this Status information can be 
seen below. 
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"DWRITE" REGISTER A ERROR BITS 
7 6 543210 



NOT READY 

WRITE PROTECTED 



I 



ILLEGAL SECTOR/RECORD NOT FOUND_ 



I I 



BAD DATA FORMAT 
"DATA REQUEST 

LOST DATA 
~CRC ERROR 



DBOOT - Branching to this routine will initiate a bootstrap load 
operation from the floppy disk. 128 bytes of data will 
be read (single density mode) into the first half of the 
3rd page of the Disk Jockey RAM (normally 340:000Q or 
E000H). The bootstrap routine terminates with a branch 
to the first location of this block. Typically sector 1 
of track zero will contain another bootstrap program 
whose job it is to load a Disk Operating System (DOS) 
such as Disk/ATE or CP/M. If the bootstrap read is not 
successful, control is passed to the DSKERR utility 
which is described below. Before sector one is read 
into memory, various memory locations of the Disk Jockey 
RAM are initialized. Also DBOOT goes through a several 
second delay the first time it is called after power-up. 
In order to effect an orderly start-up sequence, DBOOT 
does not require that the drive have a diskette in Place 
when it is called. If the drive is not ready "ben DBOOT 
is called, it falls into a loop that turns on the LED at 
the top of the controller and slowly pulses the activity 
liqht at the front of the drive. This was done so that 
DBOOT could be started before a diskette was inserted in 
the drive. When a diskette has been inserted, the door 
should be closed just AFTER the activity light has been 
pulsed . 

DMAST - This subroutine loads the B-C register pair with the 
current value of the DMA address recorded in the Disk 
jockey RAM. 

STATUS - This subroutine loads the B register with the sector 
number involved in the last disk transfer operation. It 
loads the C register with the track number the head is 
currently positioned over. Finally, it loads the ^ A 
register with a bit pattern indicating the drive 
involved in the last disk transfer operation, the length 
of the sectors on the current track, the side specified 
' by the last SETSID call, and whether or not data on the 
current track is written in single or double density 
format. The details of how this information is encoded 
in the A register is presented below. 
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A REGISTER BIT PATTERN 



DENSITY 
SIDE 



6 
I 



DRIVE LSB 
"DRIVE MSB 
"SECTOR LENGTH LSB 
"SECTOR LENGTH MSB 



DRIVE MSB 






1 
1 



DRIVE LSB 




1 

1 



DRIVE NO. 



DRIVE A 

DRIVE B 

DRIVE C 

DRIVE D 



SIDE I SIDE 

BIT | SELECTED 

1 SIDE 

1 I SIDE 1 



SECTOR | SECTOR | SECTOR | DENSITY 

LENGTH | LENGTH | LENGTH | 

MSB | LSB | | 

I I 128 | SINGLE 

I 1 | 256 ! DOUBLE 

1 I I 512 | DOUBLE 
111 I 1024 I DOUBLE 



DSKERR - Calling this routine will put the CPU into a loop which 
will cause the LED (Light Emitting Diode) at the top 
left portion of the controller board to flash on and off 
at intervals of about a second. This routine takes no 
parameters and will not return — its primary usefulness 
is to indicate when a hard error has occured during the 
bootstrap load operation. 
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DISKETTE INITIALIZATION 

Before a new diskette can be successfully used, it must be 
initialized. Most diskettes are sold pre-initialized . However, 
it is sometimes necessary to reinitialize a diskette. The 
process of initializing a diskette involves writing the header 
field of every sector of every track onto the diskette. None of 
the subroutines described above can be used to write these header 
fields. This is a safety measure to ensure that an erroneous 
branch to the firmware PROM cannot re-initialize a diskette, 
destroying all the data recorded on it. The initialization 
function for diskettes is typically provided by a command 
included in the Disk Operating System. Disk/ATE diskettes 
furnished by Morrow's/Thinker Toys contain commands FMT128, 
FMT256, FMT512 and FMT1024 to allow the user to format diskettes 
ln , an Y of the four IBM compatible formats. CP/M diskettes from 
Thinker Toys contain a command called FORMAT which allows the 
CP/M user to format diskettes in single or dual density. 
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RECAP OF REGISTER A ERROR BITS 



| "SETDMA" 7 6 5 4 


3 


2 


1 


| BIT 


| DMA ADDRESS SET TO DJ I/O SPACE 


1 






1 


1 




1 



"DREAD" 7 6 5 4 


3 


2 


1 





1 BIT | 


NOT READY | | | 
ILLEGAL DMA ADDRESS | 1 












ILLEGAL SECTOR/RECORD NOT FOUND | 
CRC ERROR 




LOST DATA 






DATA REQUEST 








BAD DATA FORMAT 















"DWRITE" 



BIT 



NOT READY 

WRITE PROTECTED 



ILLEGAL DMA ADDR 



I 



ILLEGAL SECTOR/ RECORD NOT FOUND 

CRC ERROR ~ 

LOST DATA 



DATA REQUEST 

BAD DATA FORMAT 



I "SELDRV" 7 6 
| 

I INVALID DRIVE NUMBER 



I BIT 
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UTILIZING DISK JOCKEY FIRMWARE 



Data transfers to and from the disk must be preceeded by 
calls to certain Disk Jockey routines. The function of these 
routines is to set up parameters that will be used during the 
transfer. The following procedure is suggested: 

1) Select the drive to be involved in the transfer. This 
is accomplished by calling the routine "SELDRV" with the 
proper drive number in register C. The drive need not 
be selected before every transfer. A drive once 
selected will remain selected until another drive is 
specified. For 2-headed drives, the side of a drive 
should be specified by calling the SETSID routine with 
the desired side number in the C register. 

2) If the drive has not been accessed before, the 
read/write head of the drive is in an unknown position. 
To initialize the drive a call should be made to 
"TKZERO" in order to bring the head to track zero. 

3) Set the DMA address. This involves calling the routine 
"SETDMA" with the correct value in the B-C register 
pair. It is not necessary to set the DMA address before 
every data transfer. If data is always being read into 
the same area of memory, then only one "SETDMA" call 
need be made. 

4} Set the read/write head over the desired track. This 
involves a call to "TRKSET" with the desired track 
number in register C. It is only necessary to call the 
. "TRKSET" routine when changing tracks. If the data 
transfer involves the same track as the previous 
transfer then no call to "TRKSET" should be performed. 

5) Set the desired sector number. The sector can be set by 
calling "SETSEC" with the correct sector number in 
register- C. If the sector has not changed since the 
previous "SETSEC" call, as with a read-modi fy-wr ite 
sequence, then this routine may be skipped. 

6) Read or write the desired sector. The controller can now 
be commanded to read or write to the disk by calling 
"DREAD" or "DWRITE" . 

The order in which these operations occur is not important 
with the exception that the "DREAD" or "DWRITE" routine must be 
called last. 
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Utilizing Disk Jockey Firmware 

Data Transfer Examples 

READ: 

Suppose sectors 5, 6, 7 and 8 of track 12, drive 1 are to be 
read into memory starting at location 7:000Q (700H) . The 
following program will do this: 
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Utilizing Disk Jockey Firmware 
Example of Disk Read 



001:000 


061 


356 


346 


001:003 


257 






001: 004 


117 






001:005 


315 


363 


341 


001:010 


315 


362 


341 


001:013 


016 


014 




001:015 


315 


313 


342 


001:020 


001 


005 


004 


001:023 


305 






001:024 


001 


000 


160 


001:027 


315 


011 


342 


001:032 


301 






001:033 


305 






001:034 


315 


166 


342 


001:037 


315 


042 


342 


001:042 


332 


070 


001 


001:045 


301 






001:046 


005 






001:047 


312 


073 


001 


001:052 


014 






001:053 


305 






001:054 


315 


352 


341 


001:057 


041 


000 


001 


001:052 


011 






001:063 


345 






001:064 


301 






001:065 


303 


027 


001 


001:070 


303 


070 


001 


001:073 


303 


073 


001 



1 READ LXI 


SP, 0E6EEH 


2 


XRA 


A 


3 


MOV 


C,A 


4 


CALL 


SELDRV 


5 


CALL 


TKZERO 


6 


MVI 


C,12 


7 


CALL 


TRKSET 


8 


LXI 


B f 4:005Q 


9 


PUSH 


B 


10 


LXI 


B,7000H 


11 LOOP CALL 


SETDMA 


12 


POP 


B 


13 


PUSH 


B 


14 


CALL 


SETSEC 


15 


CALL 


DREAD 


16 


JC 


ERROR 


17 


POP 


B 


18 


DCR 


B 


19 


JZ 


DONE 


20 


INR 


C 


21 


PUSH 


B 


22 


CALL 


DMAST 


23 


LXI 


H r 100H 


24 


DAD 


B 


25 


PUSH 


H 


26 


POP 


B 


27 


JMP 


LOOP 


28 ERROR JMP 


ERROR 


29 DONE JMP 


DONE 



set up the stack 
select drive A 



recalibrate the head 
seek the head to 
track 12 

sector count&number 
save sector cnt&num 
set up read address 

restore sect to read 

set up sect to read 
read the sector 
test for error 
restore sect cnt&num 
update count 

update sector number 
save count&number 
dma address into B-C 
add sector size to 
current address 
new address into B-C 

continue reading 
error stop 



Utilizing Disk Jockey Firmware 
Example of Disk Read 



0100 


31 


EE 


E6 


0103 


AF 






0104 


4F 






0105 


CD 


F3 


El 


0138 


CD 


F2 


El 


010B 


0E 


0C 




010D 


CD 


CB 


E2 


0110 


01 


05 


04 


0113 


C5 






0114 


01 


00 


70 


0117 


CD 


09 


E2 


011A 


. CI 






011B 


C5 






011C 


CD 


76 


E2 


011F 


CD 


22 


E2 


0122 


DA 


38 


01 


0125 


CI 






0126 


05 






0127 


CA 


3B 


01 


012A 


0C 






012B 


C5 






012C 


CD 


EA 


El 


012F 


21 


00 


01 


0132 


09 






0133 


E5 






0134 


CI 






0135 


C3 


17 


01 


0138 


C3 


38 


01 


013B 


C3 


3B 


01 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 



READ 



LOOP 



ERROR 
DONE 



LXI 

XRA 

MOV 

CALL 

CALL 

MVI 

CALL 

LXI 

PUSH 

LXI 

CALL 

POP 

PUSH 

CALL 

CALL 

JC 

POP 

DCR 

JZ 

INR 

PUSH 

CALL 

LXI 

DAD 

RUSH 

POP 

JMP 

JMP 

JMP 



SP,0E6EEH 

A 

C,A 

SELDRV 

TKZERO 

C,12 

TRKSET 

B,4:005Q 

B 

B,7000H 

SETDMA 

B 

B 

SETSEC 

DREAD 

ERROR 

B 

B 

DONE 

C ' 

B 

DMAST 

H, 10 0H 

B 

H 

B 

LOOP 

ERROR 

DONE 



set up the stack 
select drive A 



recalibrate the head 
seek the head to 
track 12 

sector count&number 
save sector cnt&num 
set up read address 

restore sect to read 

set up sect to read 
read the sector 
test for error 
restore sect cnt&num 
update count 

update sector number 
save count&number 
dma address into B-C 
add sector size to 
current address 
new address into B-C 

continue reading 
error stop 



Utilizing Disk Jockey Firmware 
WRITE: 

onto tra e c S":?: n I nd Pr I^rd"R t d?ive°l.' nem0ry Starti " 9 " 2a " :0M « < 8 "«, 



001:000 
001:003 
001:004 
001:005 
. 001:010 
001:013 
001:016 
001:021 
001:023 
001:026 
001:027 
001:032 
001:035 
001:036 
001:041 
001:044 
001:045 
001:046 
001:047 
001:052 
001:053 
001:054 
001:057 
001:062 
001:065 
001:066 
001:067 
001:070 
001:073 
001:076 
001:077 
001:101 
001:104 
001:107 
001:112 



061 

257 

117 

315 

315 

001 

315 

076 

062 

117 

315 

001 

305 

315 

041 

011 

345 

301 

315 

301 

305 

315 

315 

332 

301 

014 

005 

302 

072 

074 

376 

302 

303 

303 

000 



356 346 



363 341 

362 341 

000 177 
011 342 
004 
112 001 

313 342 

001 032 

352 341 
000 001 



011 342 



166 342 
123 342 
107 001 



035 001 
112 001 

007 

023 001 
104 001 
107 001 



1 WRITE 

2 

3 

4 

5 

6 

7 

8 

9 TLOOP 

10 

11 

12 

13 SLOOP 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 DONE 

34 ERROR 

35 TEMP 
36 



LXI 

XRA 

MOV 

CALL 

CALL 

LXI 

CALL 

MVI 

STA 

MOV 

CALL 

LXI 

PUSH 

CALL 
LXI 

DAD 

PUSH 

POP 

CALL 

POP 

PUSH 

CALL 

CALL 

JC 

POP 

INR 

DCR 

JNZ 

LDA 

INR 

CPI 
JNZ 
JMP 
JMP 
DB 



SP,0E6EEH 

A 

C,A 

SELDRV 

TKZERO 

B, 8000H-10 

SETDMA 

A, 4 . 

TEMP 

C,A 

TRKSET 

8,32:0010. 

B 

DMAST 

H,100H 

B 

H 

B 

SETDMA 

B 

B 

SETSEC 

DWRITE 

ERROR 

B 

C 

B 

SLOOP 

TEMP 

A 

7 

TLOOP 

DONE 

ERROR 





set up the stack 
select drive A 



recalibrate the he 
0H set initial adrs 

initial track numb 
save track number 
seek to correct trl 

sector count&numbei 
save sect and counl 
get current address 
update to next sect 

move address to B-C 

set up new address 
restore sect cnt&nu 

set up next sector 
write the data 
test for error 
recover sect cnt&nu: 
update sector 
update count 

get current track 
update track 
check if all done 
continue to next tr! 



error exit 
track storage 



Utilizing Disk Jockey Firmware 

WRITE: 

The following program writes from memory starting at 200:000Q (8000H) 
to tracks 4,5, and 6 of disk, drive 1. 



0100 

0103 

0104 

0105 

0108 

010B 

010E 

0111 

0113 

0116 

0117 

011A 

011D 

011E 

0121 

0124 

0125 

0126 

0127 

012A 

012B 

012C 

012F 

0132 

0135 

0136 

0137 

0138 

013B 

013E 

013F 

0141 

0144 

0147 

014A 



31 EE E6 
AF 

4F . 
CD F3 El 
CD F2 El 
01 00 7F 
CD 09 E2 
3E 04 

32 4A 01 
4F 

CD CB E2 

01 01 1A 

C5 

CD EA El 

21 00 01 

09 

E5 

CI 

CD 09 E2 

CI 

C5 

CD 76 E2 

CD 53 E2 

DA 47 01 

CI 

0C 

05 

C2 ID 01 

3A 4A 01 

3C 

FE 07 

C2 13 01 

C3 44 01 

C3 47 01 

00 



1 


WRITE 


LXI 


SP r 0E6EEH 


2 




XRA 


A 


3 




MOV 


C,A 


4 




CALL 


SELDRV 


5 




CALL 


TKZERO 


6 




LXI 


B,8000H-10 


7 




CALL 


SETDMA 


8 




MVI 


A f 4 


9 


TLOOP 


STA 


TEMP 


10 




MOV 


C,A 


11 




CALL 


TRKSET 


12 




LXI 


B f 32-.001Q 


13 


SLOOP 


PUSH 


B 


14 




CALL 


DMAST 


15 




LXI 


H,100H 


16 




DAD 


B 


17 




PUSH 


H 


18 




POP 


B 


19 




CALL 


SETDMA 


20 




POP 


B 


21 




PUSH 


B 


22 




CALL 


SETSEC 


23 




CALL 


DWRITE 


24 




JC 


ERROR 


25 




POP 


B 


26 




INR 


C 


27 




DCR 


B 


28 




JNZ 


SLOOP 


29 




LDA 


TEMP 


30 




INR 


A 


31 




CPI 


7 


32 




JNZ 


TLOOP 


33 


DONE 


JMP 


DONE 


34 


ERROR 


JMP 


ERROR 


35 


TEMP 


DB 





36 









set up the stack 
select drive A 



recalibrate the heac 
0H set initial adrs. 

initial track numbe: 
save track number 
seek to correct trk 

sector count&number 
save sect and count 
get current address 
update to next sect 

move address to B-C 

set up new address 
restore sect cnt&nu 

set up next sector 
write the data 
test for error 
recover sect cnt&nu 
update sector 
update count 

get current track 
update track 
check if all done 
continue to next tr 

error exit 
track storage 



DISK SYSTEM SOFTWARE 



An assembled Disk Jockey 2D i s part of a DISCUS 2 system and 
is also accompanied by a copy of Di sk/ATE (tm) . Both Disk/ATE 
and the Disk Jockey 2D CP/M are tailored to the I/O of the Disk 
Jockey 2D controller. Both expect that a serial TTY/RS-232 
terminal is connected to J2 (serial port) of the Disk Jockey. 
Both are supplied on a write protected diskette (notch open) 
which should be kept that way. DO NOT COVER THE NOTCH ON THE 
DISKETTE. Finally, both systems are designed to self load when 
the disk is placed in drive A and a branch is made to 340:000Q 
(E000H) . For CP/M users, the CP/M diskette is accompanied by a 
series of manuals describing how to back-up a CP/M diskette. The 
only precaution is that when drive B is to be used for the back- 
up, it must be "logged in" (e.g., DIR B:) before the back-up 
process begins. 

Backing Up Disk/ATE 

To make a back-up copy of Disk/ATE, load Disk/ATE and have a 
blank diskette which is not write protected (the notch should be 
covered) . Follow the steps outlined below: 

If You Have a Dual Drive System: 

1) Perform steps 6 and 7 below, inserting the blank disk in 
drive B. 

2) Type: TD A B 

TD is the transfer disk command with the source drive on 
the left and the destination drive on the right. This 
command will copy all the files on drive A to drive B. 

If You Have a Single Drive System: 

1) Type: B16 

This • command forces ATE to express numbers and addresses 
in hexidecimal radix. 

2) Type: L I02DTBL <T> 

This command loads the I/O driver symbol table from the 
disk. After the symbol table is loaded, ATE will be able 
to search the table for variable values. Some variables 
will be necessary to accomplish the back-up. 

3) Type: ? SYSIO.IOEND 

This is the standard way of interrogating ATE to find the 
value of variables. SYSIO is the beginning of the I/O 
.driver, and IOEND is the end of the driver. Make a note 
of these two values because we will need them later. 
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Disk System Software 

4) Type: L ATETBL <T> 

This loads a different symbol table from the disk and 
overwrites the previously known symbols. 

5) Type: ? BEGIN. END 

The two parameters typed back represent the extent of ATE 
except for disk buffers. Make a note of these two values 
also . 

6) Type: 

GO FMT128 to format single density 

GO FMT256 to format double density with 256 byte sectors 
GO FMT512 to format double density / 512 byte sectors 
GO FMT1024 to format double density / 1024 byte sectors 
This loads and executes the desired format program. The 
purpose of this routine is to write the IBM standard 
sector header and data marks out on the disk, and to put 
a bootstrap on track zero. 

7) The selected format program prompts the user through the 
necessary steps to format a diskette and automatically 
returns to Disk/ATE when the operation is complete. 

8) I02D and ATE must now be saved on the new diskette. I02D 
must be the first file on the disk, and ATE must be the 
second. 

9) Using the values for SYSIO and IOEND obtained from step 3 
above, Type: S I02D (SYSIO value here)H. (IOEND value 
here)H The "H" suffix is necessary to force ATE to 
interpret the preceding number as a hexidecimal number. 

10) Using the values for BEGIN and END obtained in step 5, 
Type: S ATE (BEGIN value here) H. (END value here)H 

11) Disk/ATE has now been copied on the fresh diskette. Files 
may now be transferred from the original diskette as 
required. 

Backing up other files 

Once 10 and ATE have been backed up on a diskette, some of 
the other files on the original diskette from Thinker Toys may 
need to be moved onto the backup media. There are two types of 
files presently supported by Disk/ATE: Source and binary. The 
source files always load into the source area of Disk/ATE and may 
also be saved on another diskette from the same source area. The 
Disk/ATE user's manual describes this procedure in detail. 
When a binary file is first saved on a diskette by Disk/ATE, the 
starting address is recorded in the directory entry along with 
the length. The STAT command will display the starting address 
of a binary file along with its length. The length is given in 
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increments of 1024 bytes (k) . Hence there are 2560 bytes in a 
file that is 2.5k long. When the file is loaded into memory, 
unless otherwise specified (see the Di sk/ATE user's manual) it 
will be loaded starting at the address displayed by the STAT 
command and ending at the address which is the sum of the 
starting address and the file length. This file can be saved on 
another diskette (which has been previously formatted) by simply 
placing the diskette in the drive and typing a S(ave) command 
followed by the proper beginning and ending address. As an 
example, the binary file FMT1024 is 3.0k long and and has a 
starting address of 65:000Q (3500H). To save this file on a 
back-up diskette, the following steps need to be performed: 

1) Put the disk that has FMT1024 on it in the drive. 

2) Type: L FMT1024 

3) Place the back-up diskette in the drive. 

* 

4) Type: S FMT1024 55: 000Q. . 100: 377Q 

This completes the operation. If the write protect notch of 
the diskette is not covered on the back-up diskette, Di sk/ATE 
will report a disk error and the operation will have to be done 
over with the notch covered. 

The Bootstrap loader 

Both Di sk/ATE and copies of CP/M which are purchased through 
Thinker Toys are supplied on diskettes which load into the system 
through the use of the bootstrap loader DBOOT. To use DBOOT the 
system should be turned on and the CPU's program counter should 
be initialized to 340:000Q (E000H) either from the front panel of 
the computer or through jump-start logic either on the controller 
or on some other board in the system. A 2-3 second delay occurs 
the first time DBOOT is called after power-up so that the system 
has time to stabilize before the disk is accessed. Power should 
be applied to the drive(s) that are connected to the Disk Jockey 
controller at approximately the same time it is supplied to the 
CPU. However the system should be given time to stabilize before 
a diskette is inserted a drive. DBOOT always loads from drive A. 
If a diskette is not in place when DBOOT is started, the activity 
light at the front of drive A is slowly pulsed to indicate that 
the bootstrap loader is waiting for a diskette to be inserted in 
the drive and the door to be closed. The proper time to close 
the door is just AFTER the activity light has flashed. Shortly 
after the door is closed the drive signals the controller that it 
is ready and a loader program on sector one of track zero is read 
into the Disk Jockey RAM. When DBOOT is finished, it transfers 
control to this secondary loader. 
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I/O CONNECTORS Jl AND J2 



Illustrated below are the details of the pin connections of 
Jl and J2. In both illustrations, the top of the circuit board 
is to the right of the drawing. The end pins of both connectors 
are numbered on the silk screen legend of the PC board. Note 
that all disk interface signals are active low. 



Jl 













50 


| * 


* 


I 49 


GND 












48 


* 


* 


47 


GND 




J2 




-DISK DATA 




46 


* 


* 


45 


GND 









-WRITE PROTECT 


44 


* 


* 


43 


GND 


RS232 GROUND 


* 


1 


-TRACK ZERO 




42 


* 


* 


1 41 


GND 


RS232 INPUT 


* 


2 


-WRITE GATE 




40 


* 


* 


39 


GND 


RS232 OUTPUT 


* 


3 


-WRITE DATA 




38 


* 


* 


37 


GND 


TTY+ INPUT 


* 


4 


-STEP 




36 


* 


* 


35 


GND 


TTY- INPUT 


* 


5 


-DIRECTION 




34 


* 


* 


33 


GND 


TTY+ OUTPUT 


* 


6 


-DRIVE SELECT 


4 


32 


* 


* 


31 


GND 


TTY- OUTPUT 


* 


7 


-DRIVE SELECT 


3 


30 


* 


* 


29 


GND 









-DRIVE SELECT 


2 


28 


* 


* 


27 


GND 








-DRIVE SELECT 


1 


26 


* 


* 


25 


GND 








-SECTOR 




24 


* 


* 


23 


GND 








-READY 




22 


* 


* 


21 


GND 








-INDEX 




20' 


* 


* 


19 


GND 








-LOAD HEAD 




18 


* 


* 


17 


GND 








-IN USE 




16 


* 


* 


15 


GND 












14 


* 


* 


13 


GND 












12 


* 


* 


11 


GND 








-TWO SIDED 




10 


* 


* 


9 


GND 












8 


* 


* 


7 


GND 












6 1 


* 


* 


5 


GND 












4 


* 


* 


3 


GND 












2 


* 


* 


1 


GND 
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PATCHES FOR CP/M* 



General 

This section is included for those users of the Disk Jockey 
2D who have purchased a copy of CP/M Vers. 1.4 from a source 
OTHER than Thinker Toys. Copies of CP/M sold through Thinker 
Toys have the necessary I/O routines to interface CP/M to the 
Disk Jockey controller and to the DJ2D's serial I/O facility. 
These patches will help create a SINGLE DENSITY CP/M diskette — 
NOT a double density one. Though this may seem of marginal 
interest at first glance, we would point out that this section, 
combined with the software listings provided in the back of this 
manual, constitutes an excellent example of interfacing the 
Discus 2D to a significant disk operating system. 

At the end of this section are two listings which are 
designed to allow the Disk Jockey to be interfaced with the 
Digital Research CP/M operating system. This can be done with a 
minimum of effort. 

The first listing is the so called "cold start loader" which 
is used to bring CP/M in from the disk. It also has code which 
will allow the user easily to write a modified version of CP/M 
out on the disk. There is even a small routine which writes the 
"cold start loader" itself on sector 1 of track 0. 

The second listing is CBIOS software (Custom Basic Input- 
Output System) which is the interface between CP/M and the Disk 
Jockey controller. The general idea is to key in the cold start 
loader, use the loader to bring CP/M in from a diskette, enter 
the CBIOS code and, finally, use the cold start loader to save 
everything out on a clean diskette. 

The "Cold Start Loader" 

There are three parts to the cold start loader. LOAD is at 
address 347:000Q (0E700H) and is designed to read CP/M into 
memory from location 51: 000Q (2900H) to77:377Q (3FFFH) . After 
loading CP/M, the LOAD routine branches to location 76:000Q 
(3E00H) which is a routine that initializes several memory 
locations, prints a sign-on message, and then branches to CP/M 
proper. 

SAVE is at location 347:111Q (0E749H) and is the reverse of 
LOAD. SAVE writes out on the disk starting at track sector 2 
all memory locations between 51:000Q (2900H) and 77:377Q (3FFFH) . 
After performing this operation, SAVE comes to a dynamic halt at 
STALL 347:133Q (0E75BH) . 

*CP/M is a trademark of Digital Research 
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INTLZ is a short routine which writes locations 347:000Q 
(0E700H) through 347:177Q (0E77FH) on sector 1 of track 0. Thus, 
once the cold start loader is keyed into memory, it can save 
itself at the right location on the disk. 



CBIOS 

The standard version of CP/M is designed to run with the 
Intel MDS development system and floppy disk interface. Most of 
the CP/M system software is completely independent of the 
particular 8080 hardware environment in which it happens to be 
running. However, there is a certain part which must be tailored 
to the hardware of the host system. This hardware dependent 
software is completely contained on pages 76 and 77 of CP/M 
memory (assuming the standard 16K version). CP/M can be made to 
run on different hardware by changing the software on pages 7 6 
(3E00H) and 77 (3F00H) . The CBIOS software which is supplied 
with the Disk Jockey is designed to let CP/M run when an eight 
inch full sized floppy disk is attached to the Disk Jockey 
controller that is plugged into an S-100 main frame. 

Patching CP/M 

Before actually performing any of the steps below, the Disk 
Jockey should be plugged into an S-100 bus mainframe, and an 8" 
disk drive should be connected to the controller. Be sure to 
observe correct cable orientation. You should have on hand two 
diskettes: one with CP/M and a blank one that has been formatted. 
A copy of CP/M which will run on the Disk Jockey will be 
constructed on the blank disk before any changes are attempted on 
the original CP/M disk. As a precaution, the diskette with the 
CP/M binary should have a write protect notch and this notch 
should NEVER be covered during the following steps. 

Step I: 

Plug in the controller. Connect the disk to the controller 
and turn on the the CPU and the disk drive. Do NOT put a 
diskette in the drive at this time. 
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Step II 



Be sure the drive is on and the door is OPEN. Initialize the 
CPU's program counter to 340:000Q and start the machine. After a 
several second delay, the LED at the top of the controller should 
turn on and the activity light (if one is present) on the front 
of the drive should flash briefly every several seconds. Various 
memory locations in the Disk Jockey RAM are now initialized and 

the firmware is ready to perform disk transfer operations. Stop 

fho roil ~ 



the CPU. 



Step III: 



Enter the "cold start loader" into memory starting at 

location 347:000Q (0E700H) . The instructions will extend from 

347:000Q (E700H) to 347:177Q (0E77FH) , filling most of the first 
half of the last page of RAM on the controller. 

Step IV: 

Set the program counter of the CPU to location 347:1420 
(0E762H), but do NOT start the CPU yet. 

Step V: 

Insert the BLANK diskette into the drive and close the door. 
Be sure that the diskette is NOT write protected. (An 8" write 
protected diskette has a notch near the corner of the diskette 
diagonally oppoiste the labled corner.) If this notch is missing 
or covered, the diskette is not write protected. Be sure the 
diskette is inserted right side up. On a Disk Jockey system, the 
label will be on the top . The diskette is inserted in the drive 
with the label held bewteen the thumb and forefinger. 

Step VI: 

Start the computer. The drive activity light (if one is 
present) will come on, the head will load and step out to track 
unless it is there already. After sixteen revolutions of the 
diskette, the head will unload and the activity light will go 
off. 

Step VII: 

Stop the CPU. ' It should be in the tight loop JMP DONE — 303 
171 347 octal (C3 79 E7 hex). The cold start loader has been 
written on sector 1 of track 0. 
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Patches for CP/M 

Step VIII: 

Remove the diskette from the drive. 

Step IX: 

Change location 347:001Q (0E701H) from 000Q (00H) to 133Q 
(5BH) and change location 347:002 (0E702H) from 76Q (3EH) to 347Q 
(0E7H) . 

Step X: 

Initialize the program counter of the CPU to 347:000Q (E700H) 
but do NOT start the machine. 



Step XI: 

Insert the CP/M diskette and be sure that the write protect 
notch is not covered. Close the door securely 



Step XII: 

Start the CPU. The head will load and after a second or two 
the head will step to track 1. Wait for the head to unload and 
the activity light to go off. CP/M has been loaded into memory 
between 51:000Q (2900H) and 77:377Q (3EFFH) . 

Step XIII: 

Enter the CBIOS code starting at 76:000Q (3E00H) . Be sure to 
check that the code has been entered correctly. 

Step XIV: 

Initial-ize the program counter of the CPU to 347:111Q (E749H) 
but do NOT start the CPU. 

Step XV: 

Take the diskette which has the cold start loader on track 
sector 1 and place it in the drive. Be sure that this diskette 
is still write enabled (the notch should be covered) . 

Step XVI: 

Start the CPU. The head should load, return to track and 
write the better part of tracks and 1 before it unloads. After 
the head unloads, remove the diskette and remove the write enable 
tab from the diskette. Stop the CPU. The CPU should be executing 
the JMP STALL instruction — 303 133 347 octal (C3 5B E7 hex) . 
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Patches for CP/M 



Step XVII: 



««H.,2 ?Sf hf J erm J nal to ^he serial port of the Disk Jockey and 
adjust the baud rate, parity, stop bits, and word length of the 
terminal and controller so that they match. 

Step XVIII: 

*-K a1 - I ^ PeCt -! he diskette which was removed in step XVI. Be sure 
a , th ^ Write P rotect n °tch is NOT covered. Insert the diskette 

16K CP/M VERS/1.4 

After a few more seconds the prompt should appear: 
A> 

,-. A Disk Jockey version of CP/M is now up and running. After 
this new version of CP/M has been tested (aS documentated in the 

o^inr^M'dis^e^eJ/d^^e'd^ 11 ""—-to alter the 
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HARDWARE LEVEL REGISTERS 



Users desiring a greater level of control over the floppy 
disk or serial interface may wish to refer directly to the I/O 
device registers on the DJ from their 8080 or Z80 program. There 
are thirteen one-byte registers — five of them read only, five 
write only and three read/write. The registers have eight memory 
addresses on the S-100 bus with a different register being 
selected during a read operation and a write operation when the 
addressed register is read only or write only. 

The 1791 controller comprises one of the read only registers 
(status register), one write only register (command register), 
and all three of the read-write registers (track, sector, and 
data registers) . The uses of these registers will be touched on 
only briefly here as there is included in the documentation a 
detailed data sheet describing the way in which the 1791 
controller functions. 

The 1602 UART comprises two of the read only registers (input 
data and status registers) and one of the write only registers 
(output data) . As with the 1791, we do not describe these 
registers in great detail since a data sheet for the 1602 is also 
included in the documentation. 

The 1791 controller has a negative logic data bus. For this 
reason the internal bidirectional data bus of the DJ board is 
also negative logic. However, the bus of the 1602 UART is 
positive logic. This means that when references are made to the 
UART registers, the signal levels are opposite to what one would 
normally expect. In practice then, one should always invert data 
just before it is written into the UART output register; 
likewise, data read from the UART should be inverted before it is 
interpreted. 

READABLE REGISTERS 

Register - The inverted UART data output register 

Location 343:370 (E3F8 hex) standard Disk Jockey: 

Date is stored in this register by the UART after it has been 
assembled from the serial data input stream. When a new 
character is assembled and transferred to this register, the UART 
sets the DR (Data Ready) flag. When this register is read by the 
CPU, the DR flag is reset by the UART hardware. 

Register 1 - The inverted UART status register 

Location 343:371 (E3F9 hex) standard Disk Jockey 

Only the low order five bits of this register have any 
significance. The meaning of these bits is presented below. The 
1602 data sheet should be referred to for a more detailed 
discussion of these bits. We shall list these signals using 
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their positive logic mnemonics with the understanding that 
actual signals read will be the negation of these mnemonics. 



the 



FE_| 
TBRE 



INVERTED UART STATUS BITS 

4 3 2 10 

_l I I I I PE 

I I I ~0E 

I DR 



Buffer Register Empty 



FE = Framing Error 
TBRE = Transmitter 
DR = Data Ready 
OE = Overrun Error 
PE = Parity Error 

REGISTER 2 - Disk Jockey status register 

Location 343:372 (E3FA hex) standard Disk Jockey 



of 



This register contains bits that identify the current status 
the Disk Jockey and the currently selected drive. Only the 

six low order bits have any significance in this register. The 

meanings of these bits are presented below: 

DISK JOCKEY STATUS REGISTER 



* 
5 



* 
4 



NREADY_| 
NINDEX_ 
N2SIDED 



* 

3 2 

I I 

I I 

I I 



INTRQ 
"DATARQ 

"head 



Bits marked with an asterisk reflect the current state of the 
status lines from the currently selected floppy disk drive. For 
a detailed specification of these signals see the documentation 
that accompanys the floppy disk drive. If no drive is currently 
selected or if the head is not loaded these bits are all high. 



NREADY - This bit is a 
powered up with 



when the currently selected drive is 
a diskette in place and the door closed. 



NINDEX - This line reflects the status of the INDEX line from the 
floppy disk drive. It goes to a once per revolution 
of the diskette. 

N2SIDED- This line is a when a double sided drive is connected 
to the controller AND there is a double sided diskette 
in place in the drive with the door closed. 
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Hardware level registers 

HEAD - When this line is a 1 the head of the currently selected 
floppy disk drive is loaded. 

DATARQ - When this line is a 1 the data request line from the 
1791 controller is high and the controller is requesting 
that its data register be read from or written to. When 
the data register is referenced, this line will change 
to a 0. 

INTRQ - The 1791 controller sets this line to a one whenever it 
has completed a command and is no longer busy. This line 
is reset by a reference to the command register or the 
status register of the 1791 controller. 

Register 3 - Not currently used 

Location 343:373 (E3FB hex) standard Disk Jockey 

Register 4 - 1791 controller status register 

Location 343:374 (E3FC hex) standard Disk Jockey 

This is the status register of the 1791 controller. The 
meaning of the bit patterns of this register varies depending 
upon the command that the controller is executing or has 
executed. See the 1791 data document for a detailed discussion 
of this register. 

WRITE ONLY REGISTERS 

Register - The inverted UART data input register 

location 343:370 (E3F8 hex) standard Disk Jockey 

Inverted data is stored is this register by the CPU for 
serial output by the UART. The UART transfers the data from this 
register to an internal parallel load serial output register 
where the start bit optional parity bit and the stop bits are 
appended to the data. Whenever the UART empties register 0, the 
TBRE status bit is raised to inform the CPU that it is possible 
to output more data to the UART. 

Register 1 - Disk Jockey drive control register 

location 343:371 (E3F9 hex) standard Disk Jockey 

This is a six bit register that is used by the Disk Jockey to 
select one of four drives', select side one or two for double 
sided drives, and to turn on and off the error flag LED built 
into the board near the serial connector J2. Only the low order 
six bits of this register have any significance. The meanings of 
these bits are presented below. 
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DRIVE CONTROL REGISTER 



LED OFF | 

SIDE 

NDRIVED 



4 

I 



2 

I 



NDRIVEA 
"NDRIVEB 
"NDRIVEC 



LED OFF - When a zero is stored in this bit the LED at the top 
of the board near J2 is turned on. A one stored in 
this bit turns off the LED. 



SIDE - When a double-sided drive is connected to the Disk 

Jockey a one stored in this bit selects head while a 

zero selects head 1. When a single-sided drive is 

connected to the Disk Jockey, this bit has no effect 
on the drive. 



NDRIVED - When this bit is a zero and the head is 
fourth or last drive is selected. A one 
this bit will deselect the last drive. 



loaded the 
written in 



NDRIVEC 



-This is the 
connected to 
third drive 
deselects the 



drive select bit for the 
the Disk Jockey. A zero 

when the head is loaded 

third drive. 



third drive 

selects the 

while a one 



NDRIVEB - The drive select bit for the second drive connected to 
the Disk Jockey. When the head is loaded, a zero in 
this bit will select the second drive while a one will 
deselect it. 

NDRIVEA - The drive select bit for the first drive connected to 
the Disk Jockey. A zero in this bit will select the 
first drive when the head is loaded and a' zero will 
deselect it. 

Only one of the four low order bits of this register should 
ever be a zero. If more than one of these bits are zero, loading 
the head will select more than one drive and cause data errors 
during reads and possible head position errors on seeks. 

Register 2 - The Disk Jockey function register 

Location 343:372 (E3FA hex) standard Disk Jockey 

Only the low order six bits of this register have any 
significance. Two bits load and unload the read/write head of 
the drive, one determines the density mode that the 1791 
controller operates at, another turns on and off the VCO of the 
phase-lock loop, and yet another controls the master reset of the 
1791 controller. The final bit controls the way that the CPU 
will access the data register of the 1791. During power-up, this 
register is initialized so that it is as if ones had been written 
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in all six bits, 
detailed below. 



The specific funciton of the various bits is 



DISK JOCKEY FUNCTION REGISTER 



VCOFF 



CLRFDC 



AENBL 



SINGLE 



VCOFF 

HD1 ~ 

HD0 



I 



SINGLE 
"AENBL 
"CLRFDC 



This bit controls the voltage controlled oscillator 
(VCO) . A one written in this bit will turn the VCO 
off while a zero will turn the VCO on. The VCO must 
be on to read data from the disk. 



A one written in this bit will 
controller. The chip will remain in 
until this bit, is changed to a zero, 
signal is removed the 1791 executes a 
track zero) . 



reset the 1791 

the reset state 

When the reset 

restore (seek to 



During data transfers, when the CPU references the 
1791*s data register the PREADY line (S-100 bus line 
72) is brought low which puts the processor in a wait 
state. The CPU remains in this state until the 1791 
raises its DATA REQUEST line. This mode of operation 
dispenses with the usual status test during data 
transfers and makes it possible for the Disk Jockey to 
run at double density speeds without having to use a 
DMA channel. However there are times when the CPU 
needs access to this register when the DATA REQUEST is 
low (before a seek command is issued for example). 
When the AENBL bit is a one the stall logic that 
usually governs accesses to the 1791's data register 
is disabled. This allows the CPU to have access to 
this register as if it were a normal memory location. 
However, before the Disk Jockey can correctly transfer 
data to or from the floppy disk drive, this bit must 
be a zero so that the CPU can synchronize its data 
transfers to the 1791 controller. 

When this bit is a one, the DJ board will read and 
write data to and from the disk in single density. 
When this bit is a zero, reads and writes are 
performed in double density. 
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HD0,HD1 - These two bits control the loading of the read/write 
head. Their functional character is detailed in the 
table below. 



HD1 | HD0 






1 
1 




1 

1 



Read/write head function 



not allowed 
head is loaded 
head is unloaded 
1791 may unload head 



Register 3 - Not currently used 

Location 343:373 (E3FB hex) 



standard Disk Jockey 



Register 4 - 1791 controller command register 

Location 343:374 (E3FC hex) standard Disk Jockey 

This is the command register of the 1791 controller. There 
are four different classes of commands and within each class 
there are a number of separate commands that the controller can 
execute. See the 1791 data document for a detailed discussion of 
this register and its use. 

READ-WRITE REGISTERS 



Register 5 



1791 track register 
Location 343:375 (E3FD hex) 



standard Disk Jockey 



The 1791 controller uses this register as a reference to 
where the read/write- head of the disk drive is positioned. 
Extreme care should be exercised when writing in this register. 
If care is not exercised, seek errors may likely occur. See the 
1791 data document for a more detailed discussion. 



Register 6 - 1791 sector register 

Location 343:376 (E3FE hex) 



standard Disk Jockey 



This is the sector register of the 1791 controller. Only one 
of the commands will cause the 1791 to write in this register. 
Generally the 1791 uses this register to determine which sector 
is to be read or written. See the 1791 data document for a more 
detailed discussion. 



Register 7 - 



This is 
written into 
disk. Data 



1791 data register 
Location 343:377 (E3FF 



hex) standard Disk Jockey 



the data register of the 1791 controller. Data 
this register when the controller is writing to 
is read from this register when the controller 



is 

the 

is 
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reading from the disk. The desired track number is also written 
in this register when seek commands are issued to the controller. 
As before the 1791 data document should be refered to for a more 
complete discussion 

FINAL NOTE 

The Disk Jockey firmware contains numerous examples 
illustrating the use of the hardware registers listed above. A 
comprehensive study of the two Western Digital data documents 
along with a careful examination of the Disk Jockey firmware will 
equip the interested user with enough knowledge to control the 
disk drive at the hardware level. 
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DJ2D REVISION 4 PARTS LIST 

1 5" x 10" printed circuit board 

1 240 Ohm 1/4 watt 5% resistor red-yellow-brown 

3 330 Ohm 1/4 watt 5% resistors orange-orange-brown 

2 470 Ohm 1/4 watt 5% resistors yellow-purple-brown 

2 750 Ohm 1/2 watt 5% resistors purple-green-brown 
12 Ik Ohm 1/4 watt 5% resistors brown-black-red 

1 1.5k Ohm 1/4 watt 5% resistor brown-green-red 

3 3.3k Ohm 1/4 watt 5% resistors orange-orange- red 

3 4.7k Ohm 1/4 watt 5% resistors yellow-purple-red 

2 5.36k Ohm 1/8 watt 1% resistors - These two parts 
replace the 6.19k 1% resistors which appear on the 
parts legend of the circuit board. 

2 10k Ohm 1/4 watt 5% resistors brown-black-orange 

1 11- 0j< Ohm 1/8 watt 1% resistor - This part replaces 
13.0k 1% resistor which appears on the parts legend 
of the circuit board. 

2 27k Ohm 1/4 watt 5% resistors red-purple-orange 

1 47k Ohm 1/4 watt 5% resistors yellow-purple-orange 

4 1 Megohm 1/4 watt 5% resistors brown-black-green 

1 180 Ohm 1/8 watt 5% 9 resistor SIP array 

2 3.3k Ohm 1/8 watt 5% 9 resistor SIP array 

3 33 picofarad 5% silver mica capacitors - Two of these 
parts replace the 100 picofarad capacitors which 
appear on the parts legend of the circuit board. 

2 47 picofarad 2% or 1% silver mica capacitors 

1 112 picofarad 2% or 1% silver mica capacitor 

1 470 picofarad 5% silver mica capacitor 

1 .001 microfarad disk capacitor 

1 .01 microfarad mylar capacitor 
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DJ2D Revision 4 Parts List 

1 1.5 microfarad dipped tantalum capacitor 
5 1.8 microfarad axial lead tantalum capacitors 

2 39 microfarad axial lead tantalum capacitors 

19 Disk by-pass capacitors - may vary in value from .01 
to .1 microfarads depending on current supplies 

1 Dual-in-line 50 conductor right angle header 

1 Single-in-line 7 conductor right angle header 

2 Heat sinks for 5 volt regulators 
4 6-32 5/16 flat head machine screws 
4 6-32 1/4 hex machine nuts 
1 5.0688 MHz HU/18 Crystal 

1 10.0000 MHz HU/18 Crystal 

2 8 position DIP switch arrays 4D,13D 

4 1N914/4820-0201 signal diodes 
1 1N751A 5.1 volt 5% Zener diode 

1 RL209 light emitting diode 

2 2N3904 transistors 
2 2N3906 transistors 

1 8 pin low-profile socket 

15 14 pin low-profile sockets 

16 16 pin low-profile sockets 

5 18 pin low-profile sockets 
4 20 pin low-profile sockets 

2 40 pin low-profile sockets 
.2 74LS00 quad 2-input NAND gate 3D 

1 74LS02 quad 2-input NOR gate 4C 

1 7404 hex inverter ^ 2B 
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2 74LS04/LS14 hex inverter 7B,10B 

1 74LS08 quad 2-input AND gate ID 

1 74LS13/20 dual 4-input NAND gate 8B 

1 74LS30 8-input NAND gate 7C 

2 74LS32 quad 2-input OR gate 7A,6C 

3 74LS74 dual D type flip-flop 3B,9B,2C 
1 74LS132 quad 2-input NAND Schmitt Trigger 3B 
1 74LS155 dual 1 of 4 decoder 9A 
1 74LS161 hexidecimal counter IB 

1 74165/74LS165 8 bit parallel load shift register 2D 

2 74LS174 hex register with clear 12C,13C 

2 74LS221 dual monostable - These two parts 4B,6B 

replace the 74221 IC which appears on the 
silk screened legend of the circuit board. 

2 74LS240 octal tri-state buffer 9D,10D 

2 74LS240/244 tri-state buffer 5D,6D 

3 74LS365/74LS367 hex tri-state buffer 10A,7D,8D 

1 74LS366/74LS368 hex tri-state inverter buffer 12B 

2 74366/74368 hex tri-state inverter buffer 11B,13B 
1 74390/74LS390 dual decade counter IC 
1 MM6300/6 301/8 2S 129/7 4S287 4 x 256 PROM 5C 

1 MMI6331/74LS288 8 x 32 PROM 8A 

2 MM6353/82S137/PB426 4 X 1024 PROM 80,110 
2 2114-3L 4 X 1024 low power 300NS static RAM 9C,10C 
1 BR1941/2941/COM5016 dual baud rate generator 12D 
1 TR1602 UART 13D 
1 FD1791 dual density floppy disk controller 13A 
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[ ] 1 1458/4558 dual op-amp 4A 

[ ] 2 7805 monolithic 5 volt regulator 

[ ] 1 7812 monolithic 12 volt regulator 

[ ] 1 7912 monolithic -12 volt regulator 
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CABLE CONNECTIONS 



Drives on Discus systems are connected in daisy chain fashion 
to the controller board, as illustrated below. 



I' 



I III Optional | I Optional | I Optional | | Drive A | 

| Controller | | | Drive D | | Drive C | j Drive B | (Terminated! 



As can be seen from the above figure, Drive A is located at 
one end of the cable and is the only terminated drive on the 
cable. The location of any additional drives on the cable is not 
important as long as they are not at the end of the cable. 
Again, extra drives are not terminated. 

Aside from termination, the only physical difference between 
an "A" and a "B" drive, or between any two differently addressed 
drives, is the jumper strapping on the PC board of the drives. 
Strapping a drive for termination and drive selection is 
documented in the Shugart OEM manual. 

Four different daisy chain cables are available for one, two, 
three or four drive systems. A daisy chain cable is simply a 
parallel cable. Not all available connectors on a multiple drive 
cable need be filled for the system to function. Also, a dual 
system with drives addressed, say, as "A" and "C" would work fine 
as long as the operator remembered to refer to the second drive 
as "C" rather than "B". In other words, the absence of a "B" 
drive in no way "locks out" the "C" and "D" drives. 

The following rule applies to all cable configurations 
supplied by Thinker Toys: 

The 50 pin flat ribbon cable provided with the Discus system 
should be connected to the Disk Jockey controller board so 
that the cable extends out over the solder side of the PC 
board — not the component side. 

Whichever end of the 50 pin flat ribbon cable is chosen to 
plug into the controller board, that side of the cable which 
is on the LEFT (closer to the heat sink) as it connects to 
the controller should be UP as it connects to each and every 
drive on the system. Thus, Jl pin 50 on the DJ controller 
board should come in to each disk drive via the top part of 
the male 50 pin connector attached to the cabinet of each 
drive. If the LED on the front of the drive comes on upon 
power up, the cable is on backwards and should be reversed. 
The LED on the front of the drive should light up only when 
a command has been issued to load the head. 

Any visual "key" such as an arrow or triangle on a connector 
should be used solely as an aid in implementing the 
connection scheme described above. 
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SERIAL I/O SWITCH SETTINGS 



BAUD RATE SELECTION 

Paddles 1 to 4 of Switch 2 in the lower right corner of the 
DJ control the baud rate for the 1602 UART. Sixteen separate 
baud rates, ranging from 50 to 19,200, are available. The 
following table lists all possible switch settings for baud rate 
selection. 





BAUD 


RATE 


SWITCH SETTINGS 


| SW2-1 


SW2-2 


SW2-3 


SW2-4 1 


BAUD KATE 


| on 


on 


on 


on 1 


50 


| on 


on 


on 


off I 


75 


| on 


on 


off 


on 1 


110 


| on 


on 


off 


off 1 


134.5 


| on 


off 


on 


on 1 


150 


| on 


off 


on 


off 1 


300 


| on 


off 


off 


on 


600 


1 on 


off 


off 


off 


1200 


I off 


on 


on 


on 


1800 


1 off 


on 


on 


off 


2 000 


| off 


on 


off 


on 


| 2400 


| off 


on 


off 


off 


| 3600 


| off 


off 


on 


on 


| 4800 


| off 


off 


on 


off 


| 7200 


I off 


off 


off 


on 


| 9600 


| off 


off 


off 


off 


| 19200 



WORD LENGTH 

Paddle 7 of Switch 2 controls data word length selection for 
the 1602 UART. Placing paddle 7 in the "on" position sets the 
word length to 7 bits, while "off" fixes the word length to 8 
bits. The table below gives the word length selection settings 
for the DJ. 

WORD LENGTH SELECTION 



SW2-7 



"on" 
"off" 



WORD LENGTH 



BITS 
BITS 
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STOP BIT COUNT 

SW2-5 controls the number of stop bits, either one or two, 
which the UART sends after each data word. The "off" position 
will set the device to two stop bits, and the "on" position to 
one. 



Most devices are extremely tolerant 
setting. As a general rule, if a device 
with the Disk Jockey, it is not because 
incorrect. 



concerning stop bit 

fails to communicate 

the stop bit setting is 



STOP BIT COUNT SELECTION 



SW2-5 



"off" 



STOP BIT COUNT 



1 STOP BIT 

2 STOP BITS 



PARITY 

If paddle 6 of switch 2 is in the "off" position, the UART 

will not generate any parity bits at the end of the serial data 

word. If the paddle is in the "on" position, refer to the table 
below for the proper parity setting via paddle 8. 

PARITY SWITCH SETTING 



SW2-8 



" on" 
"off" 



PARITY 



ODD PARITY 
EVEN PARITY 
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POWER-ON JUMP TABLE WITH 74LS240»S AT 5D AND 6D 
(REV 3 BOARDS SHOULD USE 244 'S ONLY) 

SET PADDLE 6 OF SW1 TO "off" FOR 74LS240»S 
SET PADDLE 7 OF SW1 TO "on" TO ENABLE POWER-ON JUMP 

(SW1 is the switch to the LEFT) 



JUMP 


ADDRESS 






SWITCH SETTING 




Octal 


Hex 


SW1-1 


SW1-2 


SW1-3 


SW1-4 


SW1-5 






(A15) 


(A14) 


(A13) 


(A12) 


(All) 


000:000 


0000 


off 


off 


off 


off 


off 


010:000 


0800 


off 


off 


off 


off 


on 


020:000 


1000 


off 


off 


off 


on 


off 


030:000 


1800 


off 


off 


off 


on 


on 


040:000 


2000 


off 


off 


on 


off 


off 


050:000 


2800 


off 


off 


on 


off 


on 


060:000 


3000 


off 


off 


on 


on 


off 


070:000 


3800 


off 


off 


on 


on 


on 


100:000 


4000 


off 


on 


off 


off 


off 


110:000 


4800 


off 


on 


off 


off 


on 


120:000 


5000 


off 


on 


off 


on 


off 


130:000 


5800 


off 


on 


off 


on 


on 


140:000 


6000 


off 


on 


on 


off 


off 


150:000 


6800 


off 


on 


on 


off 


on 


160:000 


7000 


off 


on 


on 


on 


off 


170:000 


7800 


off 


on 


on 


on 


on 


200:000 


8000 


on 


off 


off 


off 


off 


210:000 


8800 


on 


off 


off 


off 


on 


220:000 


9000 


on 


off 


off 


on 


off 


230:000 


9800 


on 


off 


off 


on 


on 


240:000 


A000 


on 


on 


on 


off 


off 


250:000 


A800 


on 


off 


on 


off 


on 


260:000 


B000 


on 


off 


on 


on 


off 


270:000 


B800 


on 


off 


on 


on 


on 


300:000 


C000 


on 


on 


off 


off 


off 


310:000 


C800 


on 


on 


off 


off 


on 


320:000 


D000 


on 


on 


off 


on 


off 


330:000 


D800 


on 


on 


off 


on 


on 


340:000 


E000 


on 


on 


on 


off 


off 


350:000 


E800 


on 


on 


on 


off 


on 


360:000 


F000 


on 


on 


on 


on 


off 


370:000 


F800 


on 


on 


on 


on 


on 
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POWER-ON JUMP TABLE WITH 74LS244'S AT 5D AND 6D 
(REV 3 BOARDS SHOULD USE 244' s ONLY) 

SET PADDLE 6 OF SW1 TO "on" FOR 74LS244'S 
SET PADDLE 7 OF SW1 TO "on" TO ENABLE POWER-ON JUMP 

(SW1 is the switch on the LEFT) 



JUMP ADDRESS 



SWITCH SETTING 



Octal 


Hex 


SW1-1 


SW1-2 


SW1-3 


SW1-4 


SW1-5 






(A15) 


(A14) 


(A13) 


(A12) 


(All) 


000:000 


0000 


on 


on 


on 


on 


on 


010:000 


0800 


on 


on 


on 


on 


off 


020:000 


1000 


on 


on 


on 


off 


on 


030:000 


1800 


on 


on 


on 


off 


off 


040: 000 


2000 


on 


on 


off 


on 


on 


050:000 


2800 


on 


on 


off 


on 


off 


060:000 


3000 


on 


on 


off 


off ■ 


on 


070:000 


3800 


on 


on 


off 


off 


off 


100:000 


4000 


on 


off 


on 


on 


on 


110:000 


4800 


on 


off 


on 


on 


off 


120:000 


5000 


on 


off 


on 


off 


on 


130:000 


5800 


on 


off 


on 


off 


off 


140:000 


6000 


on 


off 


off 


on 


on 


150:000 


6800 


on 


off 


off 


on 


off 


160:000 


7000 


on 


off 


off 


off 


on 


170:000 


7800 


on 


off 


off 


off 


off 


200:000 


8000 


off 


on 


on 


on 


on 


210: 000 


8800 


off 


on 


on 


on 


off 


220:000 


9000 


off 


on 


on 


off 


on 


230:000 


9800 


off 


on 


on 


off 


off 


240:000 


A000 


off 


on 


off 


on 


on 


250:000 


A800 


off 


on 


off 


on 


off 


260:000 


B000 


off 


on 


off 


off 


on 


270:000 


Bt300 


off 


on 


off 


off 


off 


300:000 


C000 


off 


off 


on 


on 


on 


310:000 


C800 


off 


off 


on 


on 


off 


320:000 


D000 


off 


off 


on 


off 


on 


330:000 


D800 


off 


off 


on 


off 


off 


340: 000 


E000 


off 


off 


off 


on 


on 


350:000 


E800 


off 


off 


off 


on 


off 


360:000 


F000 


off 


off 


off 


off 


on 


370:000 


F800 


off 


off 


off 


off 


off 
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BOOT LED 

Near the upper left corner of the DJ2D board, just to the 
right of terminal connector J2, is the boot LED. This LED will 
flash on and off if the DBOOT routine reports an error. Since 
the boot routine is not affected by terminal I/O, this LED can 
help in determining whether a no-go attempt at bringing up an 
operating system is due to faulty I/O hardware and/or drivers or 
due to some other cause — memory, media, controller, CPU etc. 

PHANTOM ENABLE 

The DJ2D will respond to the PHANTOM line — S-100 pin 6 7 — if 
paddle 8 of SW4 is placed in the 'on* position. This paddle is 
the lowest paddle of the LEFT switch, at location 4D. The DJ2D 
will become de-selected when the PHANTOM line goes active if this 
paddle is 'on'. If this paddle is placed in the 'off position, 
the DJ2D will ignore the PHANTOM line. In order for the Power-on 
Jump feature of the DJ2D to work on a SOL computer, the PHANTOM 
Enable Switch must be 'on'. 



POWER STABILIZATION 

When booting a disk for the first time after powering up, the 
head on Drive A will not load (as evidenced by the LED on the 
drive door release) for a second or two. After this initial 
boot, all subsequent boots should load the head immediately until 
power is turned off and on (erasing memory) . During a boot, the 
firmware on the DJ2D searches its internal RAM for a bit pattern 
to indicate that at least one boot has taken place since power 
up. If no such bit pattern is present, a short delay will be 
inserted to allow all components in the system to stabilize. 

BOOTING WITHOUT A DISKETTE 

If no diskette has been placed in Drive A and a boot is 
attempted (as is often the case during a power-on- jump when a 
system is first powered up) , the LED on Drive A will flash on 
briefly about once every second. It is possible to execute a 
boot in this mode. Insert the system diskette into Drive A. Do 
not lower the drive door, but push the diskette into the drive 
far enough so that it locks into place (the higher the drive 
door, the easier for the diskette to lock into place). Wait for 
the red LED on the diskette release button to flash on and off 
and, when it goes off, close the drive door. The diskette will 
boot the next time the LED goes on. 
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Power-on- jump 
Switch 



FAST REFERENCE FOR DJ2D DIP SWITCHES 



UART 
Switch 




"on" 

selects 
address 
bit if 
240's 



-A DDR 15 

-A DDR 14 

-A DDR 13 

-A DDR 12 

-A DDR 11_ 

- ,, on" = 244/"off" = 240 

-"on" enables POJ 

- "on" enables 
PHANTOM 



"off" 

selects 
bit if 
244's 



4D 




e.g . 

all "off"= 

19,200 Baud 

-Baud Rate 
Selection 



Stop bits 
-"on"=l/"off"=2 

- n on"=Parity/"off"=no 

-"on"=7 bits/"off"=8 

-"on"=odd parity 
"off"=even parity 



13D 



(Setting for some paddles on SW1 at 4D depend upon whether 
74LS240's or 74LS244's are used in locations 5D and 6D.) 



if: 



[ 



I 



OFF 



X 



6^ 

X 
X 



i 

1 



X 

X 

< 

K 



X 



47 



ASSEMBLY INSTRUCTIONS 



WARNING' IMPROPER ASSEMBLY OF THIS KIT WILL VOID 
THE WARRANTY. READ THESE INSTRUCTIONS CAREFULLY 
BEFORE ATTEMPTING TO CONSTRUCT THIS KIT 



INVENTORY 



Make 
included . 
Also, quickly return 



sure that all parts listed in the Parts List have been 
Notify Thinker Toys immediately if any are missing, 
all extra parts. 



USE BENDING BOARD 

With the exception of the axial tantalum capacitors and the 



1/2 watt 7 50 Ohm resistors, 
should be bent to .5 inches. 
should have a spacing of .6 
capacitors should be bent to 
will give your finished kit a 



all the resistor and diode leads 

The leads of the 750 Ohm resistors 

inches. The axial lead tantalum 

.7 inches. Use of a bending block 

more professional look. 



USE SOCKETS 

Sockets are provided for every IC on the Disk Jockey. 



i " J 

| NO REPAIR WORK WILL BE ATTEMPTED ON ANY RETURNED 1 

I BOARD WITH ANY IC SOLDERED DIRECTLY TO THE CARD I 

I I 



ORIENTATION 

When this manual refers to the bottom of the circuit board it 
means the side with the gold S-100 edge connectors. Right and 
left assume a view from the component side of the board which has 
the silk screen legend. 



All IC sockets will either have their pins numbered 
45 degree angle across the corner of pin one. On 



Jockey, all sockets and all 
right corner of the board. 



IC's have pin 1 closest to 



or have a 

the Disk 

the bottom 
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Assembly Instructions 

* 

The tantalum capacitors are polarized. The dipped tantalum 
cap has a red dot at its positive lead. This lead should be 
inserted at the bottom of the oval legend where the "+" sign is 
located. The 1.8 microfarad capacitor's positive lead is 
identified by a circular "tit" where it enters the body of the 
housing. The positive end of the 39 microfarad capacitors is 
identified by a red band. The silk screen identifies the positive 
lead of these axial parts with a "+" sign. The by-pass caps, 
identified on the silk screened legend by an asterisk "*" 
enclosed by an oval, are not polarized. The .01 mylar cap and 
the .001 disk cap are not polarized. 

The two DIP switch arrays are to be positioned so that switch 
paddle number 1 is toward the top of the board. 

The SIP resistor packs, historically prone to being inserted 
backwards, should have their white dot nearest the white dot on 
their respective legends. This turns out to be down for the two 
3.3k Ohm packs at the bottom of the board and to the right for 
the 180 Ohm pack just below the Jl connector at the top right of 
the board. 

The crystals included in this kit have a piece of foam pad 
attached to their PC board side. When these parts are installed, 
the protective paper on the back of the pad should be peeled off 
just before the leads are inserted through the circuit board at 
the position indicated on the parts legend. The foam pad has an 
adhesive on it which will hold the crystal to the circuit board. 
The pad and the adhesive are insulators so that no short circuit 
can occur when the crystal is installed. 

The orientation of the transistors is indicated on the silk 
screen legend of the circuit board, as is their type number. A 
very common cause of smoke on power-up is a 2N3906 correctly 
oriented in the place of a 2N3904 and vice versa. 

The black band at one end of the diodes marks the cathode and 
should correspond to the white arrow point on the legend of the 
circuit board. 

Placing the 50 pin flat cable connector, Jl, upside down is a 
disaster. The angled pins should go through the circuit board. 
Only the longer straight pins are long enough to accept the 
ribbon cable to the disk drive. The I/O connector, 32, should be 
positioned so that the longer angled pins point toward the top of 
the board while the shorter straight pins go through the circuit 
board. 
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Assembly Instructions 



EXAMINE THE BOARD 

Visually examine the circuit board for any trace opens or 
shorts. A concentrated five minute scrutiny will uncover most 
trace defects. Several hours of scattered, unconcentrated 
scrutiny generally won't reveal anything. Take special care that 
no shorts or opens exist on those areas of the circuit board that 
will be covered by IC sockets. Ohm out any suspicious looking 
traces for either shorts or discontinuity as appropriate. Return 
immediately any bare board found to be flawed. Such boards will 
be replaced under warranty. 

SOLDERING AND SOLDER IRONS 

The most desirable soldering tool for complex electronic kits 
is a constant temperature iron with an element regulated at 6 50 
degrees F. The tip should be fine so that it can be brought into 
close contact with the pads of the circuit board. Such irons are 
available from Weller and Unger and should be part of any 
electronics shop. 

There are three important soldering requirements for building 
this kit: 

1. Do not use an iron that is too cold (less than 6 00 
degrees F) or too hot (more than 750 degrees F) . 

2. Do not hold the iron against a pad for more than about 
six seconds. 

3. Do not apply excessive amounts of solder. 

The recommended procedure for soldering components to the 
circuit board is as follows: 

1. Bring the iron in contact with BOTH the component lead 
AND the pad . 

2. Apply a SMALL amount of solder at the point where the 
iron, component lead, and pad ALL make contact. 

3. After the initial application of solder has been 
accomplished with the solder flowing to the pad and component 
lead, the heat of the iron will have transferred to BOTH the pad 
AND lead. Apply a small amount of additional solder to cover the 
joint between the pad and the lead. 

DO NOT PILE SOLDER ON THE JOINT! EXCESSIVE HEAT AND SOLDER CAUSE 
PADS AND LEADS TO LIFT FROM THE CIRCUIT BOARD. EXCESSIVE SOLDER 
IS THE PRIMARY CAUSE FOR BOARD SHORTS AND BRIDGED CONNECTIONS. 
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PARTS INSTALLATION 



[ ] Install and solder the four signal diodes (1N914 or 
equivalent) and clip the excess leads from the parts. Be sure 
that the black bands of the diodes are positioned to match the 
arrow points of the white legend of the circuit board 



I ~~ — 1 

I PROTECT YOUR EYES WHEN YOU CLIP COMPONENT LEADS AFTER SOLDERING I 

I I 

[ ] Install and solder all the 1/4 watt resistors in place. Do 
this in sections so that the leads can be conveniently clipped. 

[ ] Install, solder, and trim the leads of the 1% precision 
resistors. 

[ ] Install, solder, and trim the lead of the 1N751A Zener diode. 
Be sure that the black band of the diode is to the left as 
indicated by the white arrow point. 

[ ] Next, install, solder and trim the leads of the 750 Ohm 1/2 
watt resistors. 

[ ] Install and solder the 40 pin sockets first, then the 20, 18, 
16, and 14 pin sockets in that order. Finally install and solder 
the 8 pin socket. By installing the sockets in this order, a 
smaller sized socket will never be placed in a larger sized 
position. 

[ ] Install and solder the SIP resistor pack arrays. The top 
pack should have its white dot to the right while the bottom 
packs will have their white orientation dots to the bottom of the 
circuit board. 

[ ] Install and solder the 5 axial lead 1.8 microfarad 
capicators. The top two have their "+" leads to the right while 
the bottom three have their "+" leads to the left. Clip the 
excess leads from the parts. 

[ ] Install, solder, and clip the leads of the two 39 microfarad 
caps. The red band of these parts must point to the right. 

[ ] Bend the leads of the 7812 and 7912 regulators, skipping the 
7805's for now. Placing a nut on top of the regulator, insert a 
screw from the bottom of the circuit board through the hole of 
the board and through the hole of the regulator. Hand tighten 
the nut. Solder the leads. Tighten the screws firmly. 
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Parts Installation 

[ ] After bending the leads 90 degrees, install and solder the 
two crystals in place. Clip the excess leads. Fix them to the 
circuit board by peeling the protective paper off their foam pad 
and pressing the pad against the board. Be sure to solder the 
crystals into place so that their padded side will fall into the 
area outlined on the silk screened legend. 

[ ] Install and solder the two connectors Jl and J2. Be sure to 
reread the orientation section before installing these parts. 

[ ] Install and solder the light emitting diode at the top of the 
board just to the right of J2. One of the leads of this diode is 
longer than the other. The longer lead is the anode and must be 
to the left when the part is inserted. Clip the excess leads 
after soldering. 

[ ] Install, solder and clip the leads of the 1.5 dipped tantalum 
cap just below J2. Be sure that the lead with the red dot is 
pointed toward the bottom of the circuit board. 

[ ] Install, solder and clip the 33 picofarad silver mica cap 
just to the left of the 10 Meg crystal in the upper left corner 
of the board. 

{ ] Install, solder and clip the two 4 7 picofarad silver mica 
caps above and below the 7 4221 IC at location 4B . 

[ ] Install, solder and clip the two 33 picofarad silver mica 
caps — one below the 74LS165 IC at location 2D and the other 
between the 7 4LS244 IC (labeled 74LS240 on the silk screened 
legend) at 6D and the 74LS367 at 7D. 

[ ] Install, solder and clip the 112 picofarad silver mica cap 
beneath the 74221 IC at location 6B . 

[ ] Install, solder and clip the 470 picofarad mica cap beneath 
the 7404 IC at location 6B. 

[ ] Install, solder and clip the .001 microfarad disk cap to the 
left of the 74LS74 IC at location 6A. 

t ] Install, solder and clip the .01 microfarad mylar cap to the 
left of the 1458/4558 IC at location 4A. 

[ ] Install, solder and clip the leads of the three transistors 
near J2, and of the 3904 transistor below DIP switch 4D, 
carefully observing the placement and orientation information 
silk screened on the circuit board. 

t ] Install and solder the two DIP switch arrays. Switch 1 of 
each DIP should be positioned toward the top of the board. 
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Parts Installation 



] Install, solder, and clip the leads of the 19 by-pass 
apacitors whose positions are identified by an oval with an 
sterisk ■*- in the middle. an 



[ ] Bend the leads of the two 7805 regulators and insert them in 
the circuit board Place a separate, finned heat sink between 
the regulator and the board, work a screw from the back of the 
board through the board, heat sink, and regulator and hand 
«il hfce " ln ^° fc J e nut on top of the regulator. Solder the leads 
and adjust the wings of the separate heat sink and, finally, 
tighten the screw. J 



CLEAN AND EXAMINE THE BOARD 

ni^t f i UX gleaner , fc ° remove solder rosin residue. Examine the 
circuit board carefully for shorts, solder bridges, or missed 
p x ns • 

HOW TO FIND WHERE TO PLACE PARTS 

For parts placement, please see the silk screened legend on the 
printed circuit board. 

When placing IC's in their sockets (which you should NOT do 
at this time!), be aware of the following deviations from or 
options to the IC numbers marked on the silk screened legend: 

--Where the silk screened legend calls for a "6.19" K resistor, 
use a 5.36K precision resistor. 

— Where the silk screened legend calls for a "13.0" K resistor 
use an 11. 0K precesion resistor. ' 

—Though the silk screened legend says "100P" for the lower two 
silver mica caps, 33 picofarad caps should be used at these two 
locations. 

--Though the silk screened legend says "LS240" at 5D and 6D, 
74LS244's may also be used here. Only 240 's should be used at 9D 



and 10D. ' """ "!* 9D 

^2 n i y V 404 * Sh 2 Ul 2 be P laced in location B3, as indicated in 
b£ substituted!" P3rt ' eith6r * ?4LS04 ° V * 74LS14 ' must not 

^LsS^Nof a 74LS00. "^ 1S ""^ MLS00 "' Sh ° Uld haVe a 

fr^lu 1 the e ? c <;P tion ° f those parts listed above, IC's may vary 
from those marked on the silk screened legend if they are listed 
as alternate IC's (following a slash) in the Parts List on pages 
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Parts Installation 



| DO NOT INSERT ANY IC'S IN THEIR SOCKETS AT THIS TIME 
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Parts Installation 

INITIAL CHECK-OUT AND POWER-UP 

Before inserting any IC's in their sockets perform the 
following check-out procedure: 

1. Re-check the back of the board for solder shorts and 
bridged connections and for pins of IC sockets that have not been 
soldered. These . unsoldered pins can cause aggravating 
intermittant probems during check-out. 

2. Re-check components for orientation and make sure all 
components to be soldered have been soldered. 

3. With an ohm meter, check for shorts between all regulated 
voltages (+5V,-5V,+12V,-12V) and ground and between any two 
regulator outputs (all regulator output pins are on the right 
side of the regulator, towards the bottom of the circuit board in 
this case) . Check for shorts between S-100 supply voltages 
<+8V,+16V, -16V) and ground. S-100 pins 1 and 51 hold 8 volts, 
pin 2 holds +16 volts, and pin 52 -16 volts. Ground is on S-100 
pins 50 and 100. Check these voltages for shorts amoung each 
other. 

4. Place the board WITHOUT IC's into an empty system bus 
slot and power up. In case of smoke, power down immediately and 
investigate. 

5. With a VOM or scope, check the regulators for +5V (both of 
the 7805's), +12V, and -12V. The bottom pin of all four 
regulators is the output. Check for Vcc and ground on all IC's. 
Check for +12V on the 1791 controller, the 2941 baud rate 
generator, and the 1458/4558 op amp. Check for -12V on the 1602 
UART and the 1458/4 558 op amp. Finally, check for -5V on the 
2941 baud rate generator. If everything is OK, power down and 
proceed to the next step. 

IC INSERTION 

If an IC insertion tool is not available, IC leads should be 
straightened a ROW at a time, not by the individual PIN. The 
edge of a straight sided table is an excellent device for this 
operation. Hold the IC by the plastic case, place one row of 
legs against a flat surface and push very slightly. Repeat with 
the opposite row. Continue this procedure until the legs of the 
IC can be inserted with minimum effort into its socket. 

When inserting an IC into its socket, take care that you DO 
NOT BEND THE IC'S LEGS UNDERNEATH ITS PLASTIC PACK. This is an 
extremely common error and can escape even a fairly careful 
visual inspection. 
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Parts Installation 

If IC pins become bent under during insertion, use a long 
nose pliers to straighten them and try again. When removing an 
IC from its socket, use an IC remover, an IC test clip (another 
must for any electronics shop) or a miniature screw driver. DO 
NOT ATTEMPT TO REMOVE AN IC WITH YOUR FINGERS. You will bleed on 
severely bent pins. 

Once all IC's have been inserted, re-check for bent pins. 
Then check twice for proper orientation. Upside down IC's are 
generally destroyed upon power up. 



IF FOR ANY REASON IT BECOMES NECESSARY TO REMOVE A | 

COMPONENT WHICH HAS BEEN SOLDERED TO THE CIRCUIT BOARD, | 

CLIP ALL LEADS BEFORE REMOVING. THIS WILL REDUCE THE | 

CHANCE OF LIFTING PADS OFF TRACES. I 



POWER UP 

If all previous checks have been performed, you are ready to 
put power to your fully populated board. In an empty system with 
power off, insert the Disk Jockey and power up. If the board 
smokes, power down and investigate. If not, measure the 
regulated voltages again. 

If any voltages have been lost since powering up the bare 
board, power down and check for upside down IC's. Isolate the 
possible faulty chip or chips by powering down, removing a 
section of IC's, and powering up again. Continue this sequence 
until the faulty IC or IC's are found. 



I I 

I BE SURE NEVER TO INSERT OR REMOVE A BOARD | 

I WITH POWER ONJ THIS MAY DAMAGE THE BOARD | 

I I 



This completes the initial check-out of your Disk Jockey. 
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DJ2D REV4 MEMORY MAP 



HEX ADDRESS 



FUNCTION 



OCTAL ADDRESS 



E000-E3F7 


ROM FIRMWARE 


340 


:000-343: 


367 




I/O REGISTERS 










WHEN READ 


WHEN WRITTEN 




343:370 




E3F8 


UART INVERTED 


UART INVERTED 






DATA INPUT 


DATA OUTPUT 








E3F9 


UART INVERTED 
STATUS 


DISK JOCKEY 
FUNCTION 




343:371 




E3FA 


DISK JOCKEY 
STATUS 


DRIVE CONTROL 
REGISTER 




343:372 




E3FB 


NOT 


USED 




343:373 




E3FC 


1791 CONTROLLER 
STATUS 


1791 CONTROLLER 
COMMAND 




343:374 




E3FD 


1791 TRACI 


C REGISTER 




343:375 




E3FE 


1791 SECTC 


)R REGISTER ! 




343:376 




E3FF 


1791 DATA 


REGISTER 




343:377 




E400-E7FF 


R/ 


M 


344:000-347 


:377 



57 



SOFTWARE LISTINGS 
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l: 






2: 






3: 






U: 






5: 






6: 






7: 






3: 






9: 






10: 






11: 






12: 






13: 


2900 


3 


1U: 


3106 


3 


15: 


0304 


3 


16: 


0003 


3 


17: 






13: 






19: 






20: 






21: 






22: 






23: 






21: 






25: 






25: 






27: 






23: 






29: 






30: 






3': 


0000 


= 


32: 






33: 






3»: 






35: 






36: 






37: 






33: 






39: 






«0: 






41: 






«2: 






S3: 


EC30 


3 


ant 


£003 


: 


*5: 


£035 


3 


36: 


E009 


3 


47: 


E00C 


3 


=»3: 


EOOF 


I 


«9: 


Ed 2 


3 


53: 


E015 


3 


51: 


£013 


3 


52: 


E013 


3 


53: 


E021 


3 


5«: 


E6ES 


3 


53: 


0059 


: 


56: 


T-irt 


3 


57: 


OCOD 


3 


'>*.: 


OSiA 


3 



• CBIOS DRIVERS FOR CPM 

• Currently the cbics is set up fcr a 16K cpm, 

• larger system, change the value cf CPM. 



tc siake a 



CPM EQU 2900H ;cp/m beginning lead address 

ENTRY E3U CPH*306H ;cp/a entrance pclnt 

CDISX EQU » ;aurrent disk storage lecatien 

I33YTE EQU 3H ;iebyte stcrage lecatien 



): 



Iebyte allows selection cf different I/O devices. It 

can be Initialized in any way by changing the equate 

bellow. 

Initial iebyte is currently defined as : 

console s tty 

reader s tty 

punch = tty 

list s tty 



INTIOBY EQU 



jinitial iebyte, 



i v. 



* The fc Hewing equates reference the disk jeckey/2d » 

* centreller beard. If your controller is nen-standard • 

* then all the equates can be changed by re-assigning the * 

* value cf ORIGIN tc be the starting address of your * 

* centreller. • 
t • 



ORIGIN ECU OEOOOH ;disk Jeckey/2d beginning address 

INPUT EQU ORIjIN-3 ;serial input routine 

OUTPUT EOU GSIGIN-S ;serial output routine 

TKZERO EQU 0aiCI!U9H ;track zero seek routine 

SEEK EQU ORICr:)*0CH ;regular track seek routine 

SECTOR E5U SRIGIIUOF'rf ;set sector routine 

DMA EQU ORIGINS 2H. ; read/write beginning address set : 

0I3KR EQU ORI3IN-15H ;disk read routine 

DISKW EOU 0RIGIN*13H ;disk write routine 

SELECT EQU 0RIGIN-13H ;disk selection routine 

TSTAT EQU 0RIGn»21H ;serial device status routine 

STACK EOU QRIGIN»6EEH ;disk jcskey/2d ran area fcr beet enly 

3EKERR EQU }JH ;seek error bit aask 

RVEHR EQU • 3FFH ;read/write error bit r.33k 

ACR EQU OSH ;carriag» return 

ALF ECU "AH ;line feed 

COTTY EQ'J '.)"*" P'lT ;default character rotaut 

CITTY SVJ i:;?'jr ;1ef^ult character inp'>; 



51: 
62: 
63: 
64: 
65: 
66: 
67: 
63: 
59: 
70: 
71: 
72: 
73: 
74: 
75: 
76: 
77: 
73: 
79: 
30: 
31: 
32: 
33: 



33: 
36: 



3E0O 

3E0O 
3E03 
3E06 
3E09 
3E0C 
3E0F 
3EI2 
3E15 
3E13 
3E1B 
3E1E 
3E21 
3E2-: 
3E2T 
3E2A 



C3203E 
C3603E 
C3C33E 
C3CC3E 
C30E3E 
C3F93E 
CJEE3E 
C3E»3E 
C3713E 
C313E0 
C3533E 

•y-u-- 

C j '.2E I 
CJA 1 JE 
:33^-Z 



* The Juap table immediately belcw oust not be altered. * 

* It is ck te make the jumps to ether address, but the * 

* function performed oust be the sane. > 



START 



ORG 



JMP 
JMP 
JMP 
JMP 
CPOUT JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 

•MS 



;mp 

JM? 



CPM-1500H 

SOOT ;ccld beet 

WBOOT ;warn beet 

CONST ;ccnsole status 

CONIN ;censcle input 

CONOUT ;ccnscle output 

LIST ;list output 

PUNCH ;punch output 

aEAOER -.reader Input 

HOME ;track 2erc hcae 

SELECT ;disk selection 

SETTRK ;track seek 

SECTOR ;3eetrr select 

DMA ;r»ai/urf.t adaress 

READ ;dis< r-ai 

WRITE ;disk write 



seieo-. 



3«l: 
85: 
86: 
37: 
33: 
39: 
90: 
91: 
92: 
93: 
9«: 
95: 
96: 
97: 
98: 
99: 
100: 
101: 
102: 
103: 
10U: 
105: 
106: 
107: 
108: 
109: 
110: 



E7»9 
E7«C 
E7«F 
£752 
E755 
E758 
E75B 
E75E 
E75F 



2118E0 

221DE7 

215EE7 

2228E7 

215BE7 

C303E7 

C358E7 

F5 

C35FE7 



E762 
E765 
E763 
E753 
E76E 
E770 
E773 
E776 
E779 



31EEE6 

C009EO 

01C0E7 

CD12E0 

OE01 

CO0FE0 

CD18E0 

OA5EE7 

C373E7 



SAVE 



STALL 
ERROR 
ERROR! 



LXI 

SHLD 

LXI 

SHLD 

LXI 

JMP 

JMP 

PUSH 

JMP 



jchange lead tc write Instead ef read 



H. WRITE 
RDL00P*2 
H. ERROR ;change error return address 

EX 17 * 1 

K, STALL ;get return address 

LOAD*3 ;gc and do the write 

STALL ;stcp here If everything ck 5 

PSW ;save status and flags 

ERR0R1 ;stcp here en errcr. 



« intlz: write this cold beet leader program cut tc the 

> disk. 

• ........... 



IHTLZ 



DOKE 



LXI 

CALL 

LXI 

CALL 

MVI 

CALL 

CALL 

JC 

JMP 



SP, STACK ;set up stack 

T5CZE30 :hcme the drive 

B.RAM^OOH ;get starting address ef this pregram 



SETDHA 

C.l 

SETSEC 

DWRITE 

ERROR 

DONE 



;set the write address 
;set the secter to write 

;write this pregram cut 
;stcp here 



1: 
2: 
3: 

4: 
5: 
6: 
7: 
3: 
3: 
10: 
11: 
12: 
13: 
11: 
15: 
16: 
17: 
18: 
19: 
20: 
21: 
22: 
23: 
21: 
25: 
26: 
27: 
23: 
29: 
30: 
31: 
32: 
33: 
31: 
35: 
36: 
37: 
38: 
39: 
10: 
11: 
12: 

«3: 
«U: 
«5: 
46: 
47: 
43: 
49: 
50: 
51: 
52: 
53: 
54: 
55: 
56: 
57: 
55: 
39: 
■50: 

61: 
62: 
63: 

6": 

65: 

66: 

57: 

63: 

69: 

70: 
71: 
72: 
73: 
74: 
75: 
76: 
77: 
73: 
79: 
50: 
?.-■: 
32: 
33: 



2900 * 
E000 = 
E400 = 
E6EE 3 
E009 = 
EOOC = 
EOOF : 
E012 = 
E015 = 
£013 = 
E024 i 

E700 



E700 

E703 

E706 

E707 

E70A 

E70B 

E7CE 

E711 

£714 

E715 

E716 

E719 

E71B 

E71C 

E71F 

E720 

E723 

E72* 

£727 

E72A 

■72a 



21003E 
31EEE5 

E5 

01022E 

C5 

CDOFEO 

CD09E0 

210029 

44 

40 

CD12E0 

050A 

C5 

CD15E0 

CI 

022AE7 

05 

C213E7 

C300E0 

CI 

05 



E72C 

E720 

E72E 

E730 

E731 

E734 

E736 

E737 

E73A 

E73B 

E73C 

E73F 

£742 

E745 

E74 6 



C3 

OC 

3E1B 

B9 

C236E7 

0E01 

C5 

CCOCEO 

CI 

C5 

CDOFEO 

CD24E0 

218000 

09 

C314E7 



» Boot leader prograa for ep/m 




de 



CPHORG 

OHIGIH 

RAH 

STACK 

TKZERO 

IRKSE7 

SETSEC 

SETDHA 

DREAD 

DWRITE. 

DMAST 



EOU 
E3U 
EOU 
EQU 

sou 

EOU 
EQU 
EQU 

EQU 
EQU 
EQU 



2900H jCPH STARTING ADDRESS 

° H ASi 3k J ° Clcey sta «ing address 



ORIGIn"«-400H 

RAM*2EEH 

0RIGIH*1 10 

0RIGIH*14Q 

ORIGIM*17q 

0RIGIJU22Q 

0RIGIN*25Q 

ORICIN-.30Q 

ORIGXH*44Q 



ORG ORIGIN+70OH 



;raa starting address <cf 2D> 

jstack pointer starting address within ram 

.track zero seek entry pcint 

jentry for track seek 

;entry point for sector set 

;disk write routine address 
;disk read/write status routine 



• load: lead in all the rest of cp/ a and the cbios. There 
» !-~ ly two ways t0 exit «»« «d«: 1) If an 

• «»H. tZ *Z* Z" Z? If ev «nrthmg works, a jump is 
She c-b!os"? Startin « l«,tie» cf the cold coo? £„ 



LOAD LXI 

LXI 
PUSH 

STADDS LXI 
PUSH 
CALL 
CALL 
LXX 

LDLOOP MOV 
KOV 
CALL 
MVI 

RDLOOP PUSH 
CALL 
POP 
JNC 
DCR 
JKI 
JMP 



EXIT 



RDGOOO - PO? 
DCR 

RZ 

INR 

HVI 

CM? 

JHZ 

XVI 

PUSH 

C2 

PO? 

PUSH 

CALL 

CALL 

LXI 

DAD 

JMP 



H, CPHORG 
SP, STACK 
H 

B.2E02H 

B 

SETSEC 

TKZERO 

H, CPHORG 

B,H 

C,L 

SETDMA 

B.10 

B 

DREAD 

3 

RDCOOD 

B 

RDLOOP 

ORIGIN 

3 

B 



.♦15O0H starting location fer cbics 

{Initialize the stack 
;save juap address fcr return later 
;reg Bssecter ccunt, reg Crstarting sector 
;save sectcr. and ccunt 
;set the sector tc read 
;hooe the drive 

-.starting lecatien fcr lead 
.put starting address in B4C 



;set up starting lead address 

J retry counter 

;save retry ccunt 

jread in the sectcr 

;fetch retry ccunt 

;take juap if read Is ck. 

;update retry ccuncer 

;try again if net ten -rrrr 3 

;start all 'v?r frrm tne b»iinni-s 

;re-f*tsn :?:fr ;<-jnt mj i 

;update tee- -r jnt 



OK 



C 

A. 27 
C 

OK 

C.l 

B 

TRKSET 

B 

B 

SETSEC 

DMAST 

H.200Q 

B 

LDLOOP 



;CO TO CPM IF DOME 

.-COMPUTE NEW SECTOR (HOD 26) 

;test if ever 26 

Jtake Juap if sectcr < 27 

;start with sector 1 cf next track 

;save ccunt and sectcr 

•.ccndlticnally set new track 

.restore ccunt and sectcr I 

;save it again 

;set new sectcr 

;get lead address 

-.update te load address 

;read next sector 



• " ve: T:: HKv^rA:* : bic - •-'■ «■• ««. • 
: « »^,e ii er-wr"- oe ^ s ^^ i ir^.rr ^ : 



37: 

53: »•»"•••••»•*•»»••*••»••»»»•«•§••*«»»»»•• 

39: • . 

93: • beet: lead in all cf cpm and then • 

?i : ' Ju"»? there. Initialize icbyte. • 

92: » . 

93: ».».... 

9»: 

95: 3E2D 31EEE6 BOOT LXI SP, STACK ;lnitial stack 

IV 11}^ ?"'?, KVI A.INTIOBt initialize icbyte 

97: 3E32 320300 STA IOBYTE 

tV IUI IV? 1 * LXI H. PROMPT ;print signcn message 

99: 3E33 C03E3E CALL HESSG 

100: 3E33 Ar XRA A ;select disk A 

10!: 3E3C 320400 STA CDISK 

!" : \IK "S^ 03 coc?;1 L « B.3QH ;set up default disk buffer 

103: 3£»2 «12S3 CALL DMA 

Ht 1 }l*i i ZZi MVI A.0C3H ;put Jump instruction tc warn beet at 

135: iz.tl 320:jO STA 

105: 3E«A 21033E LXI H.STA«T»3 

107: iHO 220100 SHLD 1 

103: 3E50 320500 STA 5 -put jump tc cpm entry at 5 

109: 3E53 210S31 LXI H.EHTRY 

110: 3E56 223600 SHLD 6 

111: 3E59 3A0400 LOA C0I3K ;jump te cpm with current disk in C 

•12: 3E5C 4F MOV C.A 

113: 3E5D C30O29 JKP CPM 

IW: 

115: •......•»...... ., .,. , ,,,, 

115: » , 

n 7, : * u3rB beet: lead in all ef cpm except the cbies. Then » 

H3: » enter cpm. . 

1-9: • " . . 



120: 



1 T 



2: 



121: 

122: 3E60 31EEE6 WBOOT LXI SP, STACK ;initialize the stack 

123: 3E63 AF XRA A ;seleet drive A 

12«: 3E5» «F HOV C,A 

125: 3E65 C013EO CALL SELECT 

125: 3E63 01022A LXI 3.2A02H ;secter ccunt and beginning sectcr 

127: 3E63 CDOAE7 CALL ORIGIN*70AH ;call the celd start leader 

123: 3E6E C33F3E -MP GOCPM ;ncu enter cpn 

129: 

130: »•••».».. 

131: • • 
132: * Hone: neve the head tc track zere. * 
133: • • 
13«: »• • "•• "■ * *»• 

135: 

135: 3E71 CD09E0 HOHE CALL TKZERO -.call the disk jcckey/2d 

137: 3E7» 0E99 SEEK1 XVI C.SEiCERR ;ncn relevent errer siask 

133: 

139: •••»»..••».»..•».•»•»..»........»........................... 

140: » • 

111: • dcerrs: returns if nc errcr. Otherwise prints an apprc- • 

142: • priate errer aessgae, and returns tc cpn with an errcr • 

1*3: » indication. » 

1*H: • • 

1*5: 

1«6: 

1*7: 3E76 DA7B3E D0E?.RS JC D0ERR1 ;test if trrrcr 

1*3: 3E79 AF SWOK XRA A ;return if ek 

l<=9: 3E7A C9 RET 

150: 3E73 A1 D3ERR1 ANA C ".strip eff unwanted errors 

155: 3E7C OEOS KVI C.8 ;errer counter 

152: 3E7E 217A3F LXI H.MSCTBL ;beginning address of aessages 

153: 3E31 5E DOLOOP MOV E,M ;get errcr address in D&E 

15«: 3E82 23 ISX H 

155: 3E33 56 HOV D.M 

155: 3E31 23 XSX H 

157: 3E85 IF RAR ;check if this bit is the error 

153: 3E35 DA30JE JC- MESSGA ;yes, exit after printig errer 

159: 3E39 00 OCR C ;nc errcr, update the ecunt down 

150: 3ESA F2313E JP DOLOOP ;centinue if net found 

161: 

162: » 

163: * if fall through then unknown errcr 

164: • 

165: 

166: 3E30 E3 MESSGA XCHG ;put aessage address into HiL 

157: 

163: ...»•»»»••»»•••• 

159: • ■ 

170: » messg: print the aessgae pointed tc by HiL and termin- * 

171: • ated by a OFFH byte. » 



: sr 



A.'l ;z~: ..-.a.-v:*.*.- 



' 't: 5:.3r AT ;\i A ;'.f-: fr r *<ij 

'": ;E»0 ?3 .■*'. 

::3: 3E9I -5 ?.'::i H ;s«v» allr-ss 

1 7 >: XZ1Z *• ".;.' t.A ;?r*^ It rasrl" rjtput 

';-.: \ejj :.;:••. :ui cpo'jt ;:/.^-. -•- • 



131: 
132: 
133: 
184: 
135: 
136: 
137: 
133: 
189: 
190: 
191: 
192: 
193: 
19t: 
195: 
196: 
197: 
198: 
199: 
200: 
201: 
202: 
203: 
20»: 
205: 
206: 
207: 
203: 
209: 
210: 
211: 
212: 
213: 
21*: 
215: 
216: 
217: 
213: 
219: 
220: 
221: 
222: 
223: 
22« : 
225: 
226: 
227: 
223: 
229: 
230: 
231: 
232: 
233: 

235: 
236: 

r>? 

2; 3: 

:-;?: 



3E9S El 
3E97 23 
3E98 C33E3E 



3E9B CDOCEO 
3E9E C37«3E 



3SA1 

3EA» 
3EA7 

3EA9 
3EAA 
3EAD 
3EAE 
3EB1 
3E32 
3E35 
3E37 



2115E0 

22AB3E 

060A 

C5 

CDOOOO 

CI 

D2793E 

05 

C2A93E 

CEr F 

C3753E 



3E3A 211 aEO 
3E30 C3A13E 



3e:o 2-i;c3F 

3EC3 ;3CF3E 



PO? 


H 


I NX 


H • 


JHP 


HESSG 



;restcre pointer 

;buap tc next character 

;ccntinue until end 



• settrk: -call the disk Jeekey/2d to seek then exit by 

* testing fcr errors. 



SETTRK CALL SEES 
JHP SEEK1 



• read: read one sector frca the disk. Try ten tines en 

* errors, before returning an error condition. 



READ 
RE»R 



RDVRL 
RW 



LXI 
SHLD 

mvi 

PUSH 

CALL 

POP 

JKC 

DCS 

JMZ 

kv: 

JH? 



H. DISKS ;put disk read address into repeat loco 



3,10 

3 



3 

RVOK 

B 

RWRL 



;retry counter 

;aetually call disk read/write 



;exit if succesful 

;test error ccunt 

;ccntinue if net zero 
C.RViEKR ;read/urite error bit aask 
DOERRS ;print the appropriate error oessage 



• write: write data onto the disk, also try ten tiaes 

* before reporting an error. 



WRITE 



LXI 

J«P 



H.DI3KW 
R3WR 



* . 

* const: get the status for the currently assigned ccnscle • 

* device. The ccnscle device can be grtten from • 

* icbyte, then a junp tc the correct console status • 

* routine is performed. » 



cons? 



LXI 
JMP 



H.CST3LE ;beginning rf juap tabl« 

C0NIS1 ;select correct junp 



2«1: 
212: 
213: 
204: 
215: 
2«6: 
217: 
2«3: 
2«9: 
250: 
251: 
252: 
253: 
25«: 
255: 
256: 
257: 
253: 
259: 
260: 
251: 
262: 
2*3: 

as- 

265: 
255: 



3EC6 213*3? 
3EC9 C3E73E 



3ECC 210H3F 



» csreader: if the console is assigned to the reader then » 

* a Juap vill be made here, where another Jump * 

* will occur to the correct reader status. • 



CSREADR LXI 
JMP 



H.CSRT3LE 
5EADESA 



;beginning of reader status table 



* cenln: take the correct Junp fcr the censole input 

* routine. The juap is based on the two least sig- 

* nificant bits of icbyte. 



COHIM LXI 



H.CIT3LE 



;beglnning cf character input table 



• entry s; cc.-.i.M Ji'.l iecrde tn* twe le3st s i jnif iC3nt bits 

• cf ::c,-.". "his is uses by ccnin ,ccr.cj», sr,: cms'.. 



257: 
266: 
259: 
270: 
271: 
272: 
273: 
27*: 
275: 
276: 
277: 
273: 
279: 
230: 
231: 
232: 
233: 
23«: 
235: 
235: 
237: 
253: 
239: 
253: 
291: 
2j2: 
Hi: 
2H: 
^95: 
2 ?•>: 
2->7: 
CH: 
21'*: 



301: 
302: 

303: 
30": 
305: 
306: 
307: 
303: 
309: 
310: 
311: 
312: 
313: 
31<: 
315: 
316: 
317: 
313: 
319: 
320: 
321: 
322: 
323: 
32* : 
325: 
325: 
327: 
323: 
329: 
330: 
331: 
332: 
333: 
33<«: 
335: 
336: 
337: 
333: 
339: 
3«0: 
311: 
3«2: 
• 3<»3: 
31«: 
3«5: 
3«6: 
3«7: 
3«8: 
309: 
350: 
351: 
J52: 
353: 
30-: 
J5-.: 
li'.: 

35': 
:= j . 

.'. >: 



3ECF 3A0300 
3E02 17 



3ED3 £506 
3ED5 1600 
3ED7 5F 
3ED8 19 
3ED9 7E 
3EDA 23 
3EDB 66 
3E-5C 6F 
3EDD, E9 



C0HI.1t LDA 
RAL 



I0BY7E 



3E3E 210C3F 
3EE1 C3CF3E 



3EEH 212U3F 



3EE7 3A0300 



3EEA IF 
3EE3 C3D33E 



3EEE 211C3F 
3EF1 3A0300 



3EF9 21H3F 
3EFC 3A0300 
3EFF IF 
3FO0 IF 
3F01 C3F»3E 



• entry at seldev will fcra an offset Into the table pointed 
te by H4L and then pick up the address and Juap there. 



SELDEV 



ANI 


6H 


MVI 


0,0 


MOV 


E.A 


DAD 


D 


HOV 


A,M 


IMX 


H 


MOV 


H,M 


MOV 


L.A 


PCHL 





;strip off unwanted bits 
;forn offset 

;add offset 

;pick up high byte 

;plclc up low byte 
;fcrn address 
;gc there ! 



» ccneut: take the proper branch address based en the two « 
• least significant bits of icbyte. • 



COHOUT LXI 
JH? 



H.C0T3LE ;be?innini? of the character cut table 

COJII.NI ;dc the decode 



• reader: select the correct reader device for input. The • 
» reader is selected frcs bits 2 and 3 cf icbyte. • 

* 

READER LXI H.RTBLE jbeginning of reader input table 

'» 

• by t csreader? d "" a UU1 d#OCd * bitS 2 » 3 cf leb * te . *"* 



READERA LDA 



I0BITE 



• 5 t H« t .S a Si,r l " shift the bits intc ^ sltic ". u " d 



READS 1 BAR 
JHP 



SELDEV 



3EF» IF 


PHCH1 


RAR 


3EF5 IF 




RAR 


3EF6 C3EA3E 




JMP 



• punch: select the correct punch device. The selection • 

■ cooes frea bits «45 cf icbyte. • 



PU}1CH "I »'^3LE ;be 4 innin S of punch table 

; «ia,: t „5:s h i y r n:t" bits a uttie acre in pre? fer 

REA0R1 



• list: select a list device 



based en bits 647 cf icbyte • 



UST LM I0BYTE E ;b ' ginninE ef tne list d «»i« "utir 



RAR 
RAR 

JMP 



IOBYTE 
PNCH1 



• If cusuaizin? I/O routines is bein? perfcrr.ed. the 

• n'!,' !'.'"""' be *mn** " reflect the chan 5 -s. • 
^ IS ...-•?. .rt.i the fcllc-inij '.oD'.*;. • 



361: 

362: 

363: 

364: 

365: 

366: 

367: 

363: 

369: 

370: 

371: 

372: 

373: 

374: 

375: 

376: 

377: 

373: 

379: 

330: 

331: 

332: 

333: 

38«: 

33S: 

336: 

337: 

333: 

339: 

390: 

391: 

392: 

333: 

39«: 

395: 

396: 

397: 

398: 

399: 

400: 

001: 

402: 

103: 

43«: 

405: 

«05: 

407: 

4T5: 

439: 

113: 

all: 

412: 

513: 

al4: 

»15: 

»16: 

41": 

4 1 3 .: 

45^: 

421: 
422: 
423: 
424: 
425: 
«2S: 
427: 
428: 
429: 
430: 
431: 
• 32: 
433: 
43U: 
435: 
436: 
437: 
433: 
439: 
440: 
isa* : 
3 4?: 
4-J: 
<me: 
4US: 
446: 
4ttT: 
443: 
44}: 



3F04 03E0 
3F06 U73F 
3F08 E4JE 
3F0A 473F 



3F0C 06E0 
3F0E 3C3F 
3F10 F93E 
3F12 3C3F 



3F14 06E0 

3F16 3C3F 

3F18 3C3F 

3F1A 3C3F 



3F1C 06E0 
3F1E 3C3F 
3F20 3C3F 
3F22 3C3F 



3F24 03E0 

3F26 "73F 

3F23 473F 

3F2A 473F 



3F2C 533? 

j?2£ 5B3F 
2? JO C63E 
•F52 5B3F 



•?3« 533F 
•r j6 53 JF 

3F38 5B3F 
3F3* 533F 



3F3C x 
3F3C = 
3F3C = 
3F3C x 

3F3C * 
3F3C = 

3F3C D302 
3F3E E680 
3F4 CA3C3F 
3F4 3 79 
3~«« D301 
3F«6 C9 



* ccnscle Input table 



CIT3LE DW CITTT 

DW CICHT 

DW READER 

DW CIUC1 



* ccnscle output table 

• 

COT3LE DW COTTY 

DW COCRT 

T)W LIST 

DW COUC1 



• list device table 



;input frcn tty (currently assigned by intloby , Input frca 2d) 

;input frcn ert (currently SWITCHBOARD serial pert 1) 

;lnput frca reader (depends en reader selection) 

;input frcra user censole 1 (currently SWITCHBOARD serial pert 1} 



;output to tty (currently assigned by inticby .output tc 2d) 

;cutput to ert (currently SWITCHBOARD serial pert 1) 

joutput tc list device (depends en bits 647 cf lebyte) 

;output to user console 1 (currently SWITCHBOARD serial pert 1) 



LT3LE DW COTTT ;output to tty (currently assigned by intleby .cut put to 2d) 

DW COCRT ;output tc ert (currently SWITCH30ARD serial pert 1) 

DW COLPT ;output to line printer (currently SWITCHBOARD serial pert 1) 

DW C0UL1 ;cutput to user line printer 1 (currently SWITCHBOARD serial pert 1) 

* punch device table 

• 

PTBLE DW COTTT ;output to the tty (currently assigned by inticby .output tc 2d) 

DW COPT? ;cutput to paper tape punch (currently SWITCHBOARD serial pert 1) 

DW C0UP1 ;eutput to user punch 1 (currently SWITCHBOARD serial port 1) 

DW C0UP2 ;eutput to user punch 2 (currntlly SWITCHBOARD serial pert 1) 

• 

• reader device input table 



RT3LE 



DW 
DW 
DW 
DW 



;input frca tty (currently assigned by inticby, input frcn 2d) 

uriii ;input frcn paper tape reader (currently SWITCHBOARD serial pert 1) 

CIUR1 ;input frcn user reader 1 (currently SWITCHBOARD serial pert 15 

CIUR2 ;input frcn user reader 2 (currently SWITCHBOARD serial port 1) 



CITTT 
CIPTR 



* eensole status table 

CST8LE DW CSTTT jstatus cf tty (currently assigned by inticby, ststus frrn 2d) 

DW CSCRT ;status frcra ert (currently SWITCHBOARD serial pert 1) 

DW C3READ3 ;status frcn reader (depends en reader device } 

DW C3UC1 ;status from user eensele 1 (currently SWITCH30AR0 serial pert 

. i 

• status frenreader device 



status r r ?-:; 



C3RT3LE DW . CSTTY ;status frca tty (currently assigned by i.iti>-By, 

DW C2PT3 ;status frcm paper tape rener (currently ZslTZ '.~~,n?S serial »".--. 

DW CSURt -.status frca user reader 1 (currently SWITCHBOARD serial pert 1) 

DW CSUR2 jstatus ef user reader 2 (currently SWITCHBOARD serial pert 1) 



• The felleuing equates set eutput device tc cutput tc 

• the SWITCHBOARD serial pert 1. 



COCRT 
COUC1 
C0UL1 
COPTP 
C0UP1 
C0UP2 
COLPT 



ECU 

EQU 

EO'J 

EQU 

EQU 

EQU 

IH 

ANI 

JZ 

MOV 

OUT 

HEX 



S ;cutput frca ert 

t ;output frca user ccnscle 1 

t ;cutput frcn user line printer 1 

t ;output frca paper tape punch 

S jeutput frca user punch 1 

t jeutput frca user punch 2 

2 ;output frcn line printer, get status 

SOH ;uait until ck to send 

COLPT 

A,C ;eutput the character 



* The fcllcuing equates set the Input frcn the devices tc 

• cent frca tne SWITCH3GARD serial pert 1 



450: 

451: 

452: 

453: 

454: 

455: 

156: 

457: 

453: 

459: 

460: 

161: 

462: 

463: 

464: 

465: 

466: 

467: 

463: 

469: 

470: 

471: 

472: 

473: 

47»: 

475: 

476: 

477: 

»7»: 

■i79: 



2F47 s 
3F47 * 
3F47 = 
3F47 * 
3F47 0B02 
3F49 E640 
3F4B CA473F 
3F4E DB01 
3F50 E67F 
3F52 C9 



3F53 CD21E0 
3F56 3£0O 
3F53 CO 
3F59 30 
3F5A C9 



CIUC1 
CICRT 
CIUR1 
CIUR2 
CIPIR 



E3U 

EQU 

EQU 

E3U 

IS 

ANI 

JZ 

111 

ASI 

RET 



t 

i 

i 

i 

2 

4 OH 
CIPTR 
1 
7FH 



;input frea user censole 1 

; input frca crt 

; Input from user reader 1 

; Input frco user reader 2 

;lnput frera paper tape reader, jet status 

;vait for character 



;strlp off the parity 



• censcle status routines, test if a character has arrived * 

• * 



C3T7T 

STAT 



CALL 

MVI 

ocs 
a ST 



TSTAT ;status frets disk Jcckey 2d 
A.O ;prep fer lerc return 

;nr thinj found 
A ;return with OFFH 



* T.-.e fr ilr-iina, equates cause the lev ices tr jet status 

• frci tne SWITCHBOARD serijl pert 1. 



481: 
432: 
433: 
434: 

435: 
486: 
437: 
433: 
439: 
490: 
491: 
492: 

493: 
494: 

495: 
496: 
497: 
498: 
499: 
500: 
50t: 
502: 
503: 
504: 
505: 
506: 
507: 
503: 
509: 
510: 
511: 
512: 
513: 
514: 
515: 
516: 
517: 
513: 
519: 
520: 
521: 
522: 
523: 
524: 
525: 
526: 
527: 
523: 
529: 
530: 
531: 
532: 
533: 
534: 
535: 
536: 
537: 
533: 
539: 
5-0: 

5"t; 
5*2: 
5<3: 
544: 
545: 



3F5B = 

3F5B = 

3F5B = 

3F5B = 

3F5B OB02 

3F50 E640 

3F5F EE40 

3F61 C3563F 



3F64 000A 

3F66 31364B20 

3F6A 43502F4D 

3F6E 20564552 

3F72 5320312E 

3F76 34 

3F77 ODOA 

3F79 FF 



3F7A 
3F7C 
3F7E 

3F30 
3F32 
3F34 
3F86 
3F38 
3F3A 

3F3C 
3F3E 
3F97 
3F93 
3F9A 
3FA2 
3FA3 
3FA5 
3FAE 
3FAF 
3FB» 
3FBA 
3FBB 
3FBD 
3FCE 
3FCF 
3FD1 
3FD9 
3FDA 
3F0C 
3FE4 
3F-:5 
3F£7 
3FF0 
3FF1 
3FF3 
3FFF 



8C3F 
933F 
A33F 
AF3F 

BB3F 
CF3F 
DA3F 
E53F 
F13F 



CSUR1 EQU $ ;status of user reader 1 

CSUR2 EQU % ;status of user reader 2 

CSPTR EQU t ;status of paper tape reader 

C5UC1 EQU t ;status of user console 1 

CSCRT IN 2 ;status frcn crt, get status 

AMI 40H ;strip of data ready bit 

XRI 40H ;make correct polarity 

JH? STAT jreturn proper indication 



* The following messages cculd be put out by the cbies. 



DB 

CB 

OATALOS 08 



44O1544120 

FF 

OOOA 

4441544120 

FF 

OOOA CRCERR 

4352432045 

FF 

ODOA ILLSEC 

494C474C20 

FF 

OOOA ILLDMA 

494C474C20 

FF 



OOOA 

5752542050 

FF 

3DCA I.'OTHOY 

»EKF542052 
FF 



JOCA 

554E4B4F57 

FF 



PROMPT DB ACR.ALF ;prcapt message 

DB M6K • 

DB 'CP/M' 

03 • YER' 

DB 'SI.' 

DB •»• 

DB ACR.ALF 

DB OFFH 



error message table 



HSGTBL DW ILLDATA ;illegal data 

DW DATAREQ ;data request 

DW DATALOS -.data lost 

DW CRCERR ;cre error 

DW ILLSEC ;illegal sector 

DW ILLDMA ;illegal dcta 

DW VRITPRO ;write protected 

DW SOTRDY ;not ready 

DW UKKNOUN ;un)cncun error 

ACR.ALF 

'ILCL DATA' 

OFFH 

ACR.ALF 

•DATA REQ 1 . 

OFFH 

ACR.ALF 

•DATA LOST' 

OFFH 

ACR.ALF 

•CRC ERROR' 

OFFH 

ACR.ALF 

•ILCL SECTOR/TRACK' 

OFFH 

ACR.ALF 

•ILCL DMA' 

OFFH 

ACR.ALF 

"WRT PROT' 

OFFH 

ACR.ALF 

'NOi KtAui 1 

OFFH 

ACR.ALF 
DB ••J!iK0i(N ERROR' 

08 CFFH 



■16K CP/M VERS 1.4" 



ODOA ILLDATA 08 

494C474C20 DB 

FF DB 

OOOA DATAREQ 08 



03 
OB 
03 
OB 
DB 
DB 
DB 
D3 
DB 
DB 
DB 
VfRITPRO 03 



DB 
D9 

cs 

3E 

CB 

UNKXOWN 33 



NEWFIRM4 

3 '10:000 

)40:000 340:000 
340:000 240:000 



340:000 
340:000 
3"0:000 
310:000 
310:000 
110:000 
110:000 
140:000 
110:000 
110:000 
110:000 
310:000 



}MO:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
510:000 
310:000 
3" 0:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 
310:000 



310:000 
310:003 
)40:O06 
310:01) 
310:011 
310:017 
5'»0:0<>2 
310:025 
310:050 
310:05 5 
510:036 
310:011 



311:000 
313:370 
311:370 
313:371 
3U:37I 
3«3:372 
313:372 
313:371 
313:371 
313:375 
313:376 
313:377 



000:200 
000:210 
000:001 
000:020 
000:001 
000:030 
000:001 
000:002 
000:010 
000:020 
000: 301 
000: 320 
000:0 35 
000:050 
000:011 
000:001 
000:010 
000:010 
000:001 
000:003 
000:0 56 
000:076 



503 HI 510 

501 577 310 

50 3 360 310 

303 157 311 

103 2"0 311 

303 225 $11 

103 126 511 

303 251 in 

10 3 371 1H 

103 II) 111 

50) 016 3"! 

505 051 <n 



1 
2 
3 

1 

5 

6 

7 

8 

9 

10 

11 

12 

11 

11 

15 

16 

17 

18 

19 

20 

21 

22 

21 

21 

25 

26 

27 

28 

29 

30 

31 

32 

33 

31 

35 

36 

37 

38 

39 

10 

11 

12 

13 

11 

15 

16 

17 

18 

19 

50 

51 

52 

51 

51 

55 

56 

57 



DISK JOCKElT/20 FIRMWARE REVISION 4 



ORIGIN 



RAH 


UDATA 
DREG 
USTAT 
DCMD 
DSTAT 
CMDREG 
CSTAT 
TRKREG 
SECREG 
DATREG 



SKCMD 

HCHD 

ISTAT 

OSTAT 

DSIDE 

TZERO 

HDINT 

LIGHT 

NOLITE 



AORG 310:0000 

EQU 310:0000 

SORG 2«0:000Q 

EQU ORIGIN+1:000Q 
EQU ORIGIN*3:370Q 

10 

10+1 

DREG 

10+2 

DCMD 

10+1 

CMDREG 

10+5 

10+6 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 10+7 



RCMD 

WCMD 

HEAD 

LOAD 

DEHSTY 

ULOAD 

RSTDIT 

ACCESS 

READ* 

INDEX 

RACMD 

CLRCMD EQU 

SVCMD EQU 



EQU 200Q 

EQU 210Q 

EQU 1 

EQU 20Q 



EQU 
EQU 
EQU 

EQU 



EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



JMP 



TRMOUT 

TKZERO JMP 

TRKSET JMP 

SETSEC 

3ETDMA 

DREAD 

DWRITE 

3ELDRV 

TPAMIC 

;.;tat 



1 

30Q 
4 
2 



EQU 10Q 
EQU 200 



301Q 

320Q 

350 

30Q 

110 

1 

10Q 

100 

4 

1 

36Q 



EQU 76Q 



DDOOT JMP BOOi 
TERMIN JMP CIN 
JMP COUT 



HOME 
SEEK 
SECSET 



JMP DMA 
JMP READ 



JMP WRITE 
JMP DRIVE 
CPAN 

tm:;tat 



JMP 
JMP 



340 


044 


303 


103 


311 


59 


DMAST 


JMP 


DMSTAT 




310:047 


303 


037 


311 


60 


STATUS 


JMP 


DISKST 




310:052 


303 


333 


310 


61 


DSKERR 


JMP 


LERROR 




340:055 


303 


277 


143 


62 


SETDEN 


JMP 


DENFIX 




110:060 


303 


336 


313 


63 
61 


SETSID 

• 


JMP 


SIDEFX 




310:063 


000 


056 




65 
66 
67 
68 


• 
■ 


DS 


560 




310 


141 








69 


BOOT 








310 


:141 


061 


372 


346 


70 




LXI 


SP, TRACK 


+1 Initialize the 


310 


144 


Oil 


3«1 


346 


71 


/ 


LXI 


H.TIMER- 


4 memory test data 


34 


•147 


021 


353 


342 


72 




LXI 


D, STABLE 


the ROM compare 


310 


152 


006 


004 




73 




MVI 


B.4 


-data and count 


310 


.154 






, 


74 


TESTL 








340 


154 


032 






75. 




LDAX 


D 


get the ROM data 


340 


: 155 


276 






76 




CMP 


M 


compare w/memory 


340 


156 


302 


172 


340 


77 




JNZ 


DRESET 


do timeout? 


310 


: 161 


043 






78 




INX 


11 


move the 


140 


162 


023 






79 




INX 


D 


-two pointers 


340 


:163 


005 






80 




OCR 


B 


dec the count 


110 


164 


302 


154 


310 


81 




JNZ 


TESTL 


test more? 


110 


: 167 


103 


175 


310 


82 




JMP 


DSETUP 


nol 


310 


172 








83 


DRESET 








310 


172 


315 


351 


313 


84 




CALL 


TIMOUT 


reset time out 


J10 


175 








85 


DSETUP 








310 


.175 


041 


001 


000 


86 




LXI 


11,1 




310 


200 


345 






87 




PUSH 


H 


track 0, sector 1 


310 


201 


056 


003 




88 




MVI 


L.MDINT 


set up side 


340 


203 


315 






89 




PUSH 


H 


-select .. also 


310 


204 


016 


377 




90 




MVI 


H, 3770 


-parameter 


310 


206 


345 






91 




PUSH 


H 


-and 


310 


207 


315 






92 




PUSH 


fl 


-track info 


J40 


210 


315 






93 




PUSH 


H 


-for the 4 


340 


211 


145 






94 




PUSH 


11 


-drives 


310 


212 


on 


000 


000 


95 




LXI 


11. 


initialize 


310 


215 


345 






96 




PUSH 


11 


-the track 


HO 


216 


061 






97 




INX 


SP 


-zero flag 


340 


217 


046 


010 




98 




MVI 


H.10Q 


current disk 


340 


221 


345 






99 




PUSH 


H 


-and new disk 


340 


222 


046 


176 




100 




MVI 


H.3760 


initialize DRVSEL 


140 


224 


545 






101 




PUSH 


II 


-and IIDFLAG 


)10 


225 


046 


317 




102 




MVI 


H.RAM+3: 


000Q/256 


140 


227 


315 






103 




PUSH 


H 


DMA address 


110 


2 30 


046 


030 




104 




HVI 


H, 50Q 


temporary TIMER 


140 


232 


345 






105 




PUSH 


H 


-constant 


310 


233 


076 


003 




106 




HVI 


A.MDINT 


initialize 1791 


110 


2)5 


062 


172 


313 


107 




STA 


DCMD 


-control bits 


140 


240 


076 


120 




108 




MVI 


A, CLRCMD 


1791 reset 


140 


242 


062 


171 


313 


109 




STA 


CMDREG 


-command 


5«0 


245 








110 


LDHEAD 








510: 


215 


257 






111 




XRA 


A 


load the head 


510 


216 


315 


015 


313 


112 




CALL 


HDCHK 


-and test for 


)10 


251 


322 


267 


340 


113 




JNC 


DOOROK 


-drive ready 


340 


251 


076 


0)6 




114 




MVI 


A, LIGHT 


turn on the 


140: 


256 


062 


352 


116 


115 




STA 


DRVSEL 


-error LED 


5«0 


261 


115 


351 


ill 


116 




CALL 


TIMOUT 


time out to 


1''0: 


261 


10 3 


215 


)40 


117 




JMP 


LDHEAD 


-close drive ioor 


*.M 


267 








118 


CGORCK 









310: 


267 


076 


076 




119 




MVI 


A.NOLITE 


turn off the 


310: 


271 


062 


352 


316 


120 




STA 


DRVSEL 


-error LED 


310: 


27« 


066 


003 




121 




MVI 


M.MDINT 


open data reg 


110: 


276 


$11 






122 




POP 


H 


discard old TIMER 


3«0: 


277 


315 


212 


313 


123 




CALL 


MEASUR 


head load time 


$10: 


302 


301 






121 




POP 


8 


recover boot 


310: 


303 


305 






125 




PUSH 


B 


addr from DMAADDR 


$10: 


301 


325 






125 




PUSH 


D 


-new TIMER value 


310: 


305 


052 


355 


312 


127 




LIILD 


STABLE+2 


set up. 


3't0: 


310 


$15 






128 




PUSH 


H 


-time out 


310: 


311 


052 


353 


$12 


129 




LIILD 


STABLE 


-test 


3'iO: 


311 


315 






130 




PUSH 


II 


-data 


310: 


315 


000 






131 




NOP 


, 


debug Instruction 


310: 


316 


305 






132 




PUSH 


B 


boot address 


310: 


317 


006 


012 




133 




MVI 


B.120 


number of retrys 


310; 


321 








131 


LDLOOP 








310: 


321 


305 






135 




PUSH 


B 


save the retry no 


310: 


322 


315 


251 


311 


136 




CALL 


READ 


read boot sector 


310: 


325 


301 






137 




POP 


B 


restore retry no 


310": 


326 


320 






138 




RNC 


, 


successful read? 


}«0: 


327 


005 






139 




DCR 


B 


nol count down 


310: 


330 


$02 


321 


3M0 


110 




JNZ 


LDLOOP 


try again 


310: 


335 








tit 


(.ERROR 








310: 


333 


016 


077 




112 




MVI 


C.77Q 




310: 


335 


021 


303 


212 


113 




LXI 


D,2fl2:303Q 


310: 


; 310 








111 


LELOOP 








310: 


310 


033 






115 




OCX 







310: 


:3H 


172 






116 




MOV 


A,D 




310: 


312 


26 3 






117 




ORA 


E 




310: 


:$13 


302 


310 


310 


118 




JNZ 


LELOOP 




310: 


316 


076 


010 




119 




MVI 


A ,100 


blink 


3'I0: 


: 350 


251 






150 




XRA 


C 


-the LED at 


310: 


351 


062 


371 


313 


151 




STA 


DREG 


-top of the 


310: 


;351 


117 






152 




MOV 


C,A 


-circuit board 


310: 


355 


303 


335 


310 


153 
151 
155 


1 
11 


JMP 


LERROR+2 




310: 


; 360 








156 


COOT 








310: 


360 


072 


371 


313 


157 




LDA 


USTAT 


get UART status 


310: 


363 


$16 


010 




158 




ANI 


OSTAT 


output ready bit 


310: 


365 


$02 


360 


$10 


159 




JNZ 


COUT 


test output ready 


J10: 


: 370 


171 






160 


, 


HOV 


A,C 


character data 


3«0: 


371 


057 






161 




CMA 






310: 


:372 


062 


370 


$1$ 


162 




STA 


UDATA 


send to UART 


310: 


375 


057 






16 3 




CMA 






310: 


: 376 


311 






161 
165 
166 


■ 
1 


RET 






310: 


377 








167 


CIN 








310: 


: $77 


072 


371 


313 


168 




LDA 


USTAT 


get UART status 


$11: 


002 


$16 


001 




169 




ANI 


ISTAT 


input ready bit 


311: 


:001 


$02 


377 


$10 


170 




JNZ 


CIN 


test input ready 


311: 


;007 


072 


370 


313 


171 




LDA 


UDATA 


get the character 


311: 


:012 


057 






172 




CMA 


, 


true data 


311: 


013 


316 


177 




17$ 




ANI 


177Q 


trim to 7 bits 


311 


:015 


$11 






171 
175 
176 


• 
1 


RET 






3»H 


:016 








177 


CPAN 








Ht 


: 016 


072 


$71 


JU 


I7B 




LDA 


USTAT 


get UART stjtua 



311:021 316 001 




179 




ANI 


ISTAT 


input ready bit 


311:023 300 




180 




RNZ 


, 


test for character 


311:021 315 377 


310 


181 




CALL 


CIN 


get character 


311:027 271 




182 




CMP 


C 


test for panic 


311:0J0 311 




183 
181 
185 




RET 




» 


311:031 




186 


TMSTAT 








311:031 072 371 


313 


187 




LDA 


USTAT 


get UART status 


311:031 316 001 




188 




ANI 


ISTAT 


input ready bit 


311:036 311 


9 


189 
190 
191 


* 
■ 


RET 






3'H:037 




192 


DISKST 








311:037 072 376 


313 


193 




LDA 


SECREG 


get current 


311:012 107 




191 




MOV 


B,A 


-sector no in B 


311:013 072 375 


313 


195 




LDA 


TRKREG 


get current 


311:016 117 




196 




HOV 


C.A 


-track no in C 


311:017 072 366 


316 


197 




LDA 


DCREG 


get current 


311:052 057 


/ 


198 




CMA 


. 


-density in 


311:053 316 001 




199 




ANI 


1 


-the msb 


311:055 017 




200 




RRC 


. 


-position 


311:056 127 




201 




HOV 


D,A 


save in D 


311:057 072 367 


316 


202 




LDA 


SIDE 


put the 


311:062 027 




203 




RAL 


, 


-side 


311:063 027 




201 




RAL 


. 


-select 


$11:061 027 




205 




RAL 


, 


-flag 


311:065 202 




206 




ADD 


D 


-in bit 


$11:066 127 




207 




MOV 


D,A 


-position 6 


311:067 072 375 


316 


208 




LDA 


SECLEN 


put the 


•311:072 027 


" 


209 




RAL 


. 


-sector length 


311:073 027 




210 




RAL 


. 


-code in bits 


$11:071 202 




211 




ADD 


D 


-2 & $ 


311:075 127 




212 




MOV 


D,A 




$11:076 072 35« 


116 


213 




LDA 


CDISK 


put the current 


311:101 202 




211 




ADD 


D 


-disk no in bits 


$11:102 311 




215 
216 
217 


• 


RET 




-0 & 1 


311:103 




218 


DMSTAT 








$11:103 315 




219 




PUSH 


II 


save the H-L pair 


311:101 052 317 


316 


220 




LIILD 


DHAADR 


DMA addr to H-L 


$11:107 101 




• 221 




MOV 


B.H 


move the DMA 


311:110 115 




222 




MOV 


C.L 


-addr to B-C 


$11:111 311 




223 




POP 


H 


recover H-L 


$11:112 $11 




221 
225 
226 


• 

1 


. RET 






$11:113 




227" 


DRIVE 








$11:11$ 076 371 




228 




MVI 


A, $710 


test for the 


$11: 115 201 




229 




ADD 


C 


-new drive number 


$11:116 076 020 




230 




MVI 


A.20Q 


less than 1 


$11:120 $30 




231 




RC 






$11:121 171 




2 32 




MOV 


A,C 


store the new 


$11: 122 062 $53 


316 


2$$ 




STA 


DISK 


drive In DISK 


$11:125 311 




2$1 
2$5 
2 $6 


• 
* 


RET 






$11: 126 




2 $7 


DMA 








$11:126 Oil 110 


010 


:$8 




LXI 


H,-J-f'R[i 


i I Ti 1 1? .; t the 



3*1 s 1 31 


Oil 




239 


311:132 


322 150 


311 


210 


311:135 


Oil 000 


031 


211 


311: 110 


Oil 




212 


311:111 


332 150 


311 


213 


311:111 


067 




211 


311:115 


076 020 




215 


3H:117 


311 




216 


311:150 






217 


311:150 


110 




218 


311:151 


151 




219 


311:152 


012 317 


316 


250 


311:155 


257 




251 


311:156 


311 




252 
253 

251 


311:157 






255 


311:157 


315 173 


311 


256 


311:16a 


365 




257 


311:163 


237 




258 


311:161 


062 371 


316 


259 


311:167 


361 




260 


311:170 


303 052 


312 


261 


311:173 






262 


311:173 


315 357 


312 


263 


311:176 


330 




261 


311:177 


257 




265 


311:200 


062 355 


316 


266 


511:203 


062 351 


316 


267 


311:206 


Oil 000 


000 


268 


311:211 


076 Oil 




269 


311:213 


315 151 


313 


270 


311:216 


316 001 




271 


311:220 


300 ■ 




272 


311:221 


067 




273 


3»1:222 


311 . 




271 
275 
276 


311:223 






'277 


311:223 


257 




278 


311:221 


261- 




279. 


311:225 


067 




280 


311:226 


310 




281 


311:227 


171 




282 


311:230 


376 033 




28 3 


311:232 


077 




281 


3«1:233 


330 




285 


311:231 


062 370 


316 


" 286 


311:237 


311 




287 

288 
289 


311:200 






290 


311:210 


171 




291 


311:211 


376 115 




292 


311:213 


077 




293 


311:211 


330 




29« 


311:215 


062 371 


316 


295 


111:250 


ill 




296 
-'97 
>9B 



DMASET 



HOME 



HENTRY 



SECSET 



SEEK 



DAD 

JNC 

LXI 

DAD 

JC 

STC 

HVI 

RET 

MOV 

MOV 

SHLD 

XRA- 

RET 



CALL 

PUSH 

SBB 

STA 

POP 

JHP 

CALL 

RC 

XRA 

STA 

STA 

LXI 

MVI 

CALL 

AMI 

RNZ 

STC 

RET 



DMASET 
II, -RAH 
B 
DMASET 

A.20Q 



H.B 
L,C 

DMAADR 
A 



HENTRY 

PSW 

A 

TRACK 

PSW 

LEAVE 

HDLOAD 

A 

TZFLAG 
HDFLAG 
H,0 

A.HCMD 
CENTRY 
TZERO 



XRA A 

ORA C 

STC . 

RZ 

MOV A,C 

CPI 27 

CMC . 

RC 

STA SECTOR 

RET 



-DMA address 
-Tor conflict 
-with the I/O 
-on the DJ/2D 
controller 



get the DMA addr 

to the H-L pair 

store 

clear the error 

-flag and return 



head to trft zero 
save the flags 
update the 
-track register 
recover the flags 
unload the head 

load the head 

test for ready error 

update 

-the two 

-flogs 

time out constant 

do the home 

-command, 

track zero bit 



error flag 



test for 
-sector zero 
error flag 

test for 
-sector 
too large 

save 



MOV 


A,C 


test for 


CPI 


77 


-track 


CMC 


• 


-too large 


RC 






STA 


TRACK 


save 


RET 







311:251 
311:251 
311:251 
311:255 
311:257 
311:260 
311:263 
311:261 
311:265 
311:266 
311:267 
311:270 
311:271 
311:271 
311:276 
311:301 
311:302 
311:302 
31 1: 303 
311:301 
311:305 
311:306 
311:311 
311:312 
311:315 
311:316 
311:317 
311:322 
311:323 
311:321 
311:321 
311:325 
311:326 
311:327 
311:330 
311:331 
311:3)2 
311:333 
3H:331 
311:335 
3H: 310 
311: 311 
311:312 
311:315 



315 065 312 

311 

076 100 

27 3 

312 350 311 

315 

031 

031 

315 

371 

035 

Oil 377 313 

076 200 

062 37I 3113 

106 

116 

305 

106 

035 

302 302 311 

025 

362 302 311 

116 

305 

061 

ill 

321 



306 316 



05 3 

106 

032 

167 

170 

022 

02 3 

175 

273 

302 321 311 

171 

272 

302 32i( 3M 

303 030 312 



311:350 
311:350 007 
311:351 117 
311:552 021 377 313 
5"1:355 076 200 
311:357 062 371 313 
311:362 
J11:362 032 
311:363 167 
311:361 013 
311:365 015 
(11:366 302 562 3'<l 
I'll: 371 303 30 \*> 



299 READ 

300 

301 

302 

303 

301 

305 

306 

307 

308 

309 

310 

311 

312 

313 

311 

315 RLOOP 

316 

517 

318 . 

319 

320 

321 

322 

323 

321 

325 

326 

327 

328 ALOOP 

329 

330 

331 

332 

333 

331 

3 35 

336 

337 

338 

339 

310 

311 

312 

iU " 

3HM • 

315 SINGLE 

)16 

317 

318 

519 

350 

351 SIIORTL 

552 

55 3 

551 

555 

556 

557 

5*:. 8 • 



CALL PREP prepare for read 

POP II recover DHA addr 

MVI A, 1000 test the 

CMP E -read command for 

JZ SINGLE -single density 

PUSH H save DMA addr 

DAD D ending 

DAD D -address* 1 

PUSH H save also 

SPIIL . adjust SP 

DCR E adjust byte cnt 

LXI H.DATREG data register 

MVI A.RCMD do the read 

STA CMDREG -command 

MOV B,M first byte of data 



MOV C,H 

PUSH B 

HOV B,M 

DCR E 

JNZ RLOOP 

DCR D 

JP RLOOP 

MOV C,H 

PUSH B 

LXI SP, STACK. 

POP H 

POP D 



2nd byte of data pair 
save the data pair 
1st byte of next pair 
dec low byte of cnt 

dec high byte of cnt 

get last byte 
store last pair 
6 adjust SP 
get the end addr+1 
get the begin addr 



OCX H early data pointer 

HOV B.M get early data 

LDAX D get late data 

MOV H,A swap the 

MOV A,B -two bytes 

STAX D -of data 

INX D advance late ptr 

MOV A,L compare 

CHP E -the two 

JNZ ALOOP -data 

MOV A,H -pointers 

CMP D -for a 

JNZ ALOOP -match 

JMP CBUSY 



RLC . initialize the data 

HOV C,A -count to 128 

LXI D.DATREC 1791 data register 

MVI A.RCMD issue the 

STA CMDREG -read command 

LDAX D get data from disk 

MOV M,A move data to memory 

I"X H increment data pointer 

DCR C decrement data count 

JNZ SIIORTL test for 

JMP CBUSY -transfer done 



311:371 
311: 371 
3«1:377 
312:000 
3«2:00t 
312:002 
312:005 
312:007 
312:012 
3«2:013 
312:011 
312:011 
3«2:015 
312:016 
312:017 
312:020 
312:023 
312:021 
312:027 
312:0)0 
312:030 
312:0)3 
312:031 
312:037 
312:010 
312:012 
312:015 
312:016 
312:016 
312:051 
312:052 
312:052 
312:053 
312:056 
312:060 
312:063 
312:061 



315 065 312 
311 

371 

35 

011 377 313 

076 210 

062 371 3MJ 

301 

161 

160 

301 

161 

035 

302 011 312 

025 

362 011 312 

160 

072 371 31? 

037 

332 030 312 

027 

316 337 

312 016 312 
067 

052 312 316 
371 

365 

072 366 316 

356 020 

062 372 313 

361 

311 



312:065 
312:065 
312:066 
312:071 
312:072 
312:075 
312:076 
312:101 
312: 102 
)12:103 
112: 106 
}12: 107 
312:112 
3"2:1H 
»12:116 
}12:117 
312:122 
312:125 
312: 1)0 
312:1)3 



321 

011 000 000 

071 

061 311 )16 

315 

052 317 316 

315 

325 

011 016 312 

315 

315 )57 312 

330 

072 375 313 

071 

311 173 311 

3)2 237 312 

Oil 375 313 

072 371 316 

276 



359 • 

360 WRITE 
361 

362 

363 

361 

365 

366 

367 

368 

369 

370 WLOOP 

371 

372 

37 3 
371 
375 
376 
377 
378 

379 CBUSY 

380 

381 

382 

38 3 
381 
385 
386 
387 
388 
389 
390 
391 
392 
393 
391 
395 
396 
397 
398 
399 
100 
101 
102 
103 
101 
105 
106 
107 
108 
109 
110 
111 
112 
11) 
111 
115 
116 
117 
118 



RETURN 



LEAVE 



PREP 



CALL PREP prepare for write 
POP H recover DMA addr 
adjust SP 

E adjust byte cnt 

H.DATREG data reg 

A.WCMD do a write 

CMDREC -command 

B get the 1st data pair 

h,C write first byte 



SPHL 

DCR 

LXI 

MVI 

STA 

POP 

MOV 

HOV 
POP 
MOV 
DCR 



H,D 
B 

M,C 
E 



JNZ WLOOP 
OCR D 



JP 
MOV 

LDA 

RAR 

JC 

RAL 

ANI 

JZ 

STC 



WLOOP 
M,B 

CSTAT 

CBUSY 

337Q 

RETURN 



LHLD STACK-2 
SPHL . 

PUSH PSW 
LDA DCREG 
XRI LOAD 
STA DCHD 
POP PSW 
RET 



write high byte 
get next data pair 
write low byte 
dec low byte of cnt 

dec high byte of cnt 

write last byte 

get 1791 status 
busy bit to carry 

restore the ACC 
error bit mask 
go to the exit 
set the error flag 

get the user SP 
restore the user SP 



1791 control bits 
toggle 'the 
-load bit 
-the 1791 data reg 



POP D get return addr. 

LXI H,0 get the user's 

DAD SP -stack pointer 

LXI SP, STACK local stack 

PUSH H save user's SP 

LHLD DMAADR DMA address 

PUSH H save DMA addr 

PUSH D save return addr 

LXI H, RETURN error 

PUSH It -exit 

CALL HDLOAD load the head 

RC . disk not ready? 

LDA TRKREG get the old trk 

INR A test for head 

CZ HENTRY -not calibrated 

JC SERROR seek error? 

LXI II, TRKREG present trk 

LDA TRACK the new track 

CMP M test for head motion 



312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
)12 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 

312 
312 

312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
312 
)12 
)12 
312 
)12 
)12 
312 
)12 

312 
)12 

3«2 
)12 
)12 



131 013 

135 01) 

136 167 

137 171 
110 062 
113 312 

116 257 

117 062 
152 072 
155 316 
157 037 

160 037 

161 037 

162 306 
161 Oil 
167 315 
172 332 
175 

175 072 

200 267 

201 302 
201 006 
206 

206 076 
210 315 
213 316 
215 312 
220 072 
223 356 
225 062 
2)0 062 
233 005 
231 302 
237 

237 315 
212 303 
215 

215 006 
217 

217 021 
252 Oil 
255 076 
257 062 
262 

262 032 

263 167 
261 051 
265 302 
270 Oil 
273 315 

276 267 

277 312 
302 005 
)0) 302 
306 30) 
311 

311 072 
311 117 
)15 006 
317 Oil 



372 313 
175 312 

351 316 
372 313 
010 



030 

000 000 

151 313 

237 312 

351 316 

311 312 
002 

035 

117 313 
231 

215 312 

366 316 
001 

366 316 

372 313 

206 312 

157 311 

236 313 

012 

377 313 

372 316 
301 

371 313 



262 312 

371 313 

176 313 

311 312 

217 312 

237 312 

375 316 

000 

353 3«2 



119 

120 

121 

122 

123 

121 

125 

126 

127 

128 

129 

130 

131 

132 

133 

131 

135 

136 

137 

138 

139 

110 

111 

112 

113 

111 

115 

116 

117 

118 

119 

150 

151 

152 

153 

151 

155 

156 

157 

158 

159 

160 

161 

162 

163 

161 

165 

166 

167 

168 

169 

170 

171 

172 

17 3 

171 

175 

176 

177 

178 



INX 

INX 

HOV 

HOV 

STA 

JZ 

XRA 

STA 

LDA 

ANI 

RAR 

RAR 

RAR 

ADI 

LXI 

CALL 

JC 



TVERFY 



SLOOP 



SERROR 

RDHDR 
RHLOOP 



RHL1 



H 

H 

M,A 

A.C 

DCHD 

TVERFY 

A 

HDFLAG 

DSTAT 

DSIDE 



SKCMD 
H,0 

CENTRY 
SERROR 



LDA HDFLAG 

ORA A 

JNZ CHKSEC 

HVI B,2 



MVI 

CALL 

ANI 

JZ 

LDA 

XRI 

STA 

STA 

DCR 

JNZ 



A.SVCMD 

COHAN D 

2310 

RDHDR 

DCREG 

DENSTY 

DCREG 

DCHD 

B 

SLOOP 



CALL HOME 
JHP BERROR 

MVI B.12Q 



advance to the 

-data register 

save the new trk 

turn off data 

-access control bit 

test for seek 

force a read 

-header operation 

get the 

-double 

-sided 

-flag 

-to do 3 ms 

-step operation 

do a seek 

-command 

seek error? 

get the force 
-verify track flag 
no seek & head OK 
verify retry no 

do a veriTy 

-command 

error bit mask 

no error! 

1791 control reg 

flip the density bit 

update and 

-change density 

dec retry count 

-and try again 

there is a 
-hard seek error 

number of retrys 



LXI D.DATREG data register 

LXI H.TRACK+1 storage area 

MVI A.RACMD do the read 

STA CMDREG -header command 



LDAX D 
MOV M,A 
INR L 
JNZ RIILt 
LXI II, CSTAT 
CALL BUSY ' 
ORA A 

CHKSEC 



RHLOOP' 

SERROR 



JZ 
DCR 
JNZ 
JHP 



get a data byte 
store in memory 
inc mem pointer 
test for more data 
wait for 1791 
to finish cmd 
test for errors 
transfer OK? 
dec retry count 
test for 
-hard error 



CHKSEC 



LDA GECLEN get the sector 

HOV C,A -size and setup 

::VI U,0 -the offset 

_ZI II, STABLE see size tbl 



342:322 
342:323 
}12:326 
312:327 
342:330 
312:332 
3«2:333 
312:331 
312:335 
342:340 
312:313 
312:313 
312:311 
312:315 
312:316 
312:317 
312:350 



Oil 

072 370 316 

107 

206 

076 020 

330 

3H 

170 

062 376 313 

011 100 000 

015 
121 
135 
370 
051 
303 313 312 



312:35} 

312:353 315 

312:351 315 

312:355 360 

312:356 367 



312:357 
312:357 
312:362 
312:363 
312:361 
312:365 
312:366 
312:367 
312:370 
312:371 
312:372 
J12:37'l 
312: 375 
313:000 
313:001 
313:003 
313:001 
313:005 
313:006 
313:011 
313:012 
313:013 
313:016 
313:017 
3'M:02O 
3«3:021 
113:022 
1" 3:023 
{13:021 
313:027 
313:030 
313:031 
313:032 
111:011 



011 353 316 
116 

013 

136 

161 

013 

173 

271 

176 

066 001 

013 

312 015 313 

315 

026 000 

102 

031 

031 

072 

167 

013 

021 

032 

167 

311 

Oil 

011 

176 

062 

013 

176 

022 

076 177 



366 346 



375 3«3 



366 316 



479 

180 

181 

182 

483 

181 

485 

186 

487 

488 

489 SZLOOP 

190 

491 

192 

493 

191 

495 

196 * 

197 • 

198 STABLE 
199 

500 

501 

502 

503 • 

501 • 

505 HDLOAD 

506 

507 

508 

509 

510 

511 

512 

513 

511 

515 

516 

517 

518 

519 

520 

521 

522 

523 

521 

525 

526 

527 

528 

529 

530 

511 

5 32 

533 

531 

5 35 

516 

5 37 

5 58 DSROT 



DAD 

LDA 

MOV 

ADO 

HVI 

RC 

POP 

MOV 

STA 

LXI 

DCR 

MOV 

MOV 

DM 

DAD 

JMP 



B 

SECTOR 

B,A 

M 

A, 200 

H 

A,B 

SECREG 
11,1000 

C 

D.H 

E,L 

H 
SZLOOP 



DB 315Q 

DB 315Q 

DB 3600 

DB 3670 



LXI 

MOV 

INX 

MOV 

MOV 

INX 

MOV 

CMP 

MOV 

MVI 

INX 

JZ 

PUSH 

MVI 

MOV 

DAD 

DAD 

LDA 

MOV 

INX 

LXI 

LDAX 

MOV 

POP 

DAD 

DAD 

MOV 

STA 

INX 

MOV 

5TAX 

MVI 



add the offset 

get the sector 

save In B 

compare w/table tntry 

error flag 

error return 

return addr to TOS 

save the sector 

-in sector reg 

half page count 

sec size count 
half size count 
-to the D-E pair 
return If done 
double the xfer 
-size count 



H.DISK 

C,M 

H 

E.M 

M,C 

II 

A,E 

C 

A,M 

M.HEAD 

H 

IIDCHK 

H 

D,0 

8,D 

D 

D 

DC REG 

M,A 

II 

D.TRKREG 

D 

M,A 

II 

B 

D 

A,M 

DC REG 

II 

A.M 

D 

A, 1770 



new disk no to C 

current disk to E 
update current disk 
head load constant 
test for 
-disk change 
head load flag 
update head load 
addr of disk table 
no disk change? 
save table address 
set up the 
-offset address, 
get the current 
-disk parameters 
save the 
density Info 
current track 

get current trk 

save 

recover tbl addr 

add the 

-offset 

get control bits 

update DC REG 

get the old 

track number 

and update 1791 , 

disk select bits 



343:031 
313:035 
313:036 
343:011 
313:011 
313:045 
313:015 
313:050 
143:051 
313:054 
343:055 
34 3:060 
313:061 
313:061 
313:065 
313:066 
313:071 
313:071 
313:075 
313:100 
313:102 
313:103 
3U:101 
313:105 
343: 106 
313:107 
313:111 
343:112 
343:113 
343:116 
313:117 
313:122 
343: 122 
343:123 
343:124 
343:125 
343:130 

313:131 
343:131 
343:132 
34 3:134 

343:135 
343:135 
34 3:140 
3'i J: 142 
313:113 
3U:115 
313:116 



007 

015 

362 034 343 

062 352 316 

257 



316 



316 



Oil 372 313 

216 

062 351 

365 

072 352 346 

117 

072 367 346 

057 

241 

062 371 343 

072 366 316 

117 

072 371 

326 001 

237 

075 

057 

261 

167 

356 002 

117 

361 

302 131 313 

345 

052 345 346 

053 

174 

265 

302 122 313 

311 

176 

316 010 
310 

072 366 346 

366 30 

167 

076 200 

067 

311 



14}:117 

5'i3: 147 052 J15 316 

543:152 051 

343:153 051 

14 3:154 

}i}:151 353 

111: 155 Oil 371 }4J 

?« 3:160 103 166 3U 

i"l:163 

;'M:I6! 101 157 112 



539 

510 

511 

512 

543 

544 

515 

516 

547 

548 

549 

550 

551 

552 

553 

551 

555 

556 

557 

558 

559 

560 

561 

562 

563 

561 

565 

566 

567 

568 

569 

570 

571 

572 

573 

571 

575 

576 

577 

578 

579 

580 

581 

582 

583 

581 

585 

586 

587 

588 

589 

590 

591 

592 

591 

591 

595 

596 

597 

598 



RLC . 

DCR C 

JP DSROT 

STA DRVSEL 

XRA A 



HDCHK 



TLOOP 



RDYCIIK 



UNLOAD 



LXI 

ANA 

STA 

PUSH 

LDA 

MOV 

LDA 

CM A 

ANA 

STA 

LDA 

MOV 

LDA 

SUI 

SBB 

DCR 

CMA 

ORA 

MOV 

XRI 

MOV 

POP 

JNZ 

PUSH 

LIILD 

DCX 
MOV 
ORA 
JNZ 
POP 

HOV 
AH I 
RZ 

LDA 
ORI 
MOV 
MVI 
STC 
RET 



H.DSTAT 

M 

IIDFLAG 

PSW 

DRVSEL 

C,A 

SIDE 

C 

DREG 

DCREG 

C.A 

TRACK 

1 

A 

A 

C 

M,A 

ACCESS 

C,A 

PSW 

RDYCHK 

H 

TIMER 

H 

A,H 

L 

TLOOP 

II 



DCREG 
ULOAD 
M,A 
A ,2O0Q 



COMAND 



CENTRY 



PATCH 



rotate to 

-select the 

-proper drive 

save 

force head load 

test for 

-head loaded 

save the head 

-loaded status 

get current drive 

save 

get current side 

and merge 

-with drive select 

select drive * side 

1791 control bits 

save 

get the new trk 

force single 

-density 

-If track = 

compliment 

merge w/control bits 

set 1791 control 

toggel access bit 

save PREP routine 

head load status 

conditionally 

-wait for head 

-load time out 

count down 
-10 ms for 
-head load 
-time out 
disk status addr 



A,M test for 
READY -disk ready 



LHLD TIMER 
DAD II 
CAD II 

XCHG . 

LXI H.CSTAT 

JMP PATCH* 3 



force a 
-head 
-unload 
set disk 
-not ready 
-error flag 



get index count 
-and multiply 
-by four 

save In D-E pair 
Issue command 
Jump around patch 



JMP HDLOAD patch for old ATt 



343:166 
313: 167 

343:170 
343:171 
313:171 
343:172 
341:173 
343:176 
343:176 
343:177 
34 3:200 
343:201 
343:202 
343:203 
343:204 
343:205 
343:210 
343:211 
343:212 
343:213 
343:216 
34 3:220 
343:223 
343:225 
343:226 
343:231 
343:233 
343:234 
343:235 
343:236 
343:236 
343:240 
343:241 



000 
000 
167 

176 
037 
322 171 343 

176 

037 

176 

320 

033 

172 

263 

302 176 343 

345 

043 

126 

072 366 346 

356 004 

062 372 3»3 

356 004 

343 

062 372 343 

066 320 

343 

162 

341 

076 021 

067 

311 



343:242 
343:242 
343:245 
343:250 
34 3:252 
343:252 
343:253 
343:254 
343:257 
343:257 
343:260 
343:261 
343:264 
343:264 
343:265 
J4J:266 
343:267 
34 3:270 

343:271 
343:272 
343:273 
34 3:276 



021 000 000 
041 372 343 
016 020 



176 
241 
302 252 

176 
241 
312 257 

02 3 

343 

343 

343 

34 3 

176 

241 

302 264 

311 



34 3 



343 



343 



34 3:277 



599 

600 

601 

602 

603 

604 

605 

606 

607 

608 

609 

610 

611 

612 

613 

614 

615 

616 

617 

618 

619 

620 

621 

622 

623 

624 

625 

626 

627 

628 

629 

630 

631 

632 

633 

634 

6 35 

636 

637 

638 

639 

640 

641 

642 

64 3 
644 
645 
646 
647 
648 
649 
650 
651 
652 

65 3 
65« 
655 
656 
657 
658 



NBUSY 



BUSY 



NOP fill 

hop mi 

MOV M,A 

MOV A,M 

RAR . 

JNC NBUSY 



BERROR 



MEASUR 



INDXHI 



INDXLO 



INDXCT 



MOV 

RAR 

MOV 

RNC 

OCX 

MOV 

ORA 

JNZ 

PUSH 

INX 

MOV 

LDA 

XRI 

STA 

XRI 

XTHL 

STA 

MVI 

XTHL 

MOV 

POP 

MVI 
STC 

RET 



A,M 

A,M 



A.D 

E 

BUSY 

H 

II 

D.M 

DC REG 

RSTBIT 

DCMO 

RSTBIT 

£>CMD 
M.CLRCHD 

M,D 
II 

A.21Q 



Instruction 
Instruction 
to the 1791 

watt 

-for the 
-busy flag 

test for 
-device busy 
restore status 
return If not busy 
teat for 
-two disk 
-revolutions 
47 machine cycles 
save emd address 
track register 
save present track 
1791 control bits 
reset the 1791 
-controller to ' 
-clear the 
^command busy 
-fault 

force an Interrupt 
restore the 
-the track no 
restore the stack 

lost record 
-error flag 



LXI 0,0 
LXI H.DSTAT 
MVI C, INDEX 

MOV A , M 

ANA C 

JNZ INDXHI 

MOV A,M 

ANA C 

JZ INDXLO 

INX D 

XTHL . 

XTHL . 

XTHL . 

XTHL . 

MOV A,K 

AHA C 

JNZ INDXCT 

RET . 



Initialize count 
status port 
index bit flag 

wait for 
-index 
-pulse low 

wait for 
-Index 
-pulse high' 

advance count 

four 

-dummy 

-instructions 

-for delay 

wait 

-for next 

-low index 

98 machine cycles 



■ 

DENFIX 



313:277 


171 


659 




MOV 


A.C 


trim excess 


34 3:300 


346 001 


660 




ANI 


1 


-bits, 


34 3:302 


057 


661 




CMA 


. 


compliment 


343:303 


107 


662 




MOV 


B,A 


-B and save 


343:304 


041 353 346 


663 




LXI 


H.DISK 


new disk 


343:307 


136 


664 




MOV 


E,M 


get disk np 


343:310 


026 000 


665 




MVI 


D,0 


offset addr 


343:312 


043 


666 




INX 


H 


current disk 


343:313 


176 


667 




MOV 


A,H 


move to ACC 


343:314 


253 


668 




.XHA 


E 


compare w/new 


343:315 


365 


669 




PUSH 


PSW 


save status 


343:316 


043 


670 




INX 


H 


disk table 


343:317 


04 3 


671 




INX 


H 


-address 


34 3:320 


031 


672 




DAD 


D 


add the 


343:321 


031 


673 




DAD 


D 


offset 


343:322 


176 


674 




MOV 


A.M 


get parameters 


343:323 


366 001 


675 




ORI 


1 


make off density 


343:325 


240 


676 




ANA 


B 


set new density 


343:326 


167 


677 




MOV 


M,A 


update 


34 3:327 


361 


678 


' 


POP 


PSW 


check for ndxcd 


343:330 


300 


679 




RNZ 


. 


new disk not old 


343:331 


176 


680 




MOV 


A.M 


update CDISK 


343:332 


062 366 346 


681 




STA 


DC REG 


-also 


343:335 


311 


682 
683 
684 


• 
• 


RET 






343:336 




685 


SIDEFX 








343:336 


171 


686 




MOV 


A.C 


get the side bit 


343:337 


346 001 


687 




ANI 


1 


trim excess bits 


343:341 


027 


688 




RAL 


. 


move the bit 


343:342 


027 


689 




RAL 


. 


-to the side 


343:343 


027 


690 




RAL 


. 


-select bit 


343:344 


027 


691 




RAL 


. 


-position 


343:345 


062 367 346 


692 




STA 


SIDE 


save 


343:350 


311 


693 

694 
695 


• 
• 


RET 






343:351 




696 


TIMOUT 








343:351 


041 000 000 


697 




LXI 


11,0 


time out delay 


343:354 




696 


TILOOp 








34 3:354 


053 


699 




OCX 


H 


decrement 


34 3:355 


174 


700 




MOV 


A.H 


test for 


34 3:356 


265 


701 




ORA 


L . 


-count zero 


143:357 


343 


702 




XTHL 


. 


long 


343:360 


343 


70 3 




XTHL 


. 


-NOP 


343:361 


302 354 343 


704 




JNZ 


TILOOP 




34 3:364 


311 


705 
706 
707 


• 


RET 






34 3:365 


340 


708 




DB 


D000T/256 backward 


343:366 


000 


709 




DB 





-Jump 


343: 367 


101 


710 
711 
712 


DVREND 

• 
• 


DB 


3030 


-Instruction 


146:314 




713 




AORC 


IUH.2: 314Q 


346: 314 


000:031 


714 
715 


STACK 

x 


DS 


310 




{46: 345 


000 30 


716 


TIMER 


VA 


10:000Q 


head load tim« 


146: 347 


000 1«7 


717 


DMAADR 


IV 


{47:0000 rtma address 


146:351 


000 


718 


HDFLAC 


DB 





read header fl .«•. 



116:352 376 
3*6:353 000 
316:351 010 
316:355 00O 
316:356 003 
316:357 377 
316:360 003 
316:361 377 
J16:362 003 
316:363 377 
316:361 003 
316:365 377 
316:366 003 
316:367 000 
316: 370 000 
316:371 000 
316:372 000 
316:373 000 
316: 371 000 
316:375 000 
316: 376 000 
316:377 000 



719 


DRVSEL 


DB 


3760 


drive select constant 


720 


DISK 


DB 





new drive 


72? 


CDISX 


OB 


10Q 


current dr.lve 


722 


TZFLAG 


DB 





track zero indicator 


723 


OOPRAH 


DB 


3 


drive parameters 


72M 


DOTRK 


DB 


3770 


drive track no 


725 


D1PRAM 


DB 


3 


drive 1 parameters 


726 


D1TRK 


DB 


3770 


drive 1 track no 


727 


D2PRAM 


DB 


3 


drive 2 parameters 


728 


•D2TRK 


DB 


377Q 


drive 2 track no 


729 


D3PRAH 


DB 


3 


drive 3 parameters 


7 30 


D3TRK 


DB 


3770 


drive 3 track no 


731 


DCREC 


DB 


3 


current parameters 


732 


SIDE 


DB 





new side select 


733 


SECTOR 


DB 





new seotor 


731 


TRACK 


DB 





new track 


735 


TRKNO 


DB • 





disk 


736 


SIDENO 


DB 





-sector 


737 


SECTNO 


DB 





.-header 


738 


SECLEN 


DB 





-data 


739 


CRCLO 


DB 





-buffer 


710 


CRCHI 


DB 








BLOCK DIAGRAM 



INTRQ 

OATA RQ 

PAUSE UNTL 



PSYNC 
PDB1N 

NVRITE 
PUR 



AB - «9 



DISK STATUS BUS 

HEAD LOADED 

OATA RQ 

INTRQ 

STATUS SELECT 



DO BUS 






} 



BOARO 
SELECT 

I 
CONTROL 
LOGIC 



■ WARD SELECT 

- ROM SELECT 

- FUNCTION SELECT 

■ DISK SELECT 

- CONTROLLER SELECT 

• STATUS SELECT 

• UART SELECT 
UART STATUS 
READY 

■ READ 
WRITE 



ADDRESS 
BUFFERS 



1 K 
BYTE 
RON 



"\ DISK SELECT \ 
/ HEAD LOAD / 



INTERNAL 
TRI-STATE 
DATA BUS 



FUNCTION 

SELECT 

REGISTER 



RESET 
FUNCTION SELECT ■ 



DENSITY SELECT - 

OATA SEPARATOR 
CONTROL ' 



DISK READ DATA- 



DATA 
SEPARATOR 

t 
SYSTEM 
CLOCK 



DENSITY SELECT ■ 
CONTROLLER RESET ■ 



DISK STATUS BUS 



2*2: 



1 K 
BYTE 
RAW 



t 

V 



z> 



DISK 

CONTROLLER 

TRI-STATE 

STATUS 

BUFFER 



I 



o 



J 



FND 179! 
FLOPPY DISK 
CONTROLLER 

I 
DISK CONTROL 
BUS DRIVERS 



CONTROLLER SELECT • 



SYSTEM CLOCK ■ 



2** 



WRITE ENCODE 

& 
PRECOMPENSAT- 
ION LOGIC 



TRI-STATE 
DATA INPUT 
BUFFER 



INTERNAL 
TRI-STATE 
DATA BUS 






UART STATUS 

UART SELECT 

RESET 



UART, 
BAUD RATE 
GENERATOR 

k 
RS232/TTY 
LEVEL 
CONVERSION 



READ 
RESET 



POWER ON 
JUMP LOGIC 



TRI-STATE 
DATA OUTPUT 
BUFFER 



READ ■ 
BOARD SELECT ■ 



OHM G. MORROW 



POISK SELECT BUS 



HEAD LOADED 

OATA SEPARATOR 
CONTROL 
PAUSE CONTROL 
DENSITY SELECT 
CONTROLLER RESET 



SYSTEM CLOCK 



} 



DISK CONTROL BUS 



-*— DATA RO 
-*- INTRQ 



DISK WRITE DATA 



RS 23Z I/O BUS 



TTY I/O BUS 



ADDR DSBL 



>D1 BUS 



TBT- 



PHANTOM ENABLE (ON) 



PhanTBS (?7>- 



ah m>- 



Ai3 [e£>- 



A12 [5?>- 



All Q[f>- 



aio Qf>- 



SOW [4?> 
SINP [46> 
SINTA [%> 



A9 Q?>- 



A8 [84>- 



16, 



, 1 



15, 



330 

I * V CC 

• RAM 




4-access en6l- 



74LS367 TYPICAL 



STATUS MEN 



POBIN [5|>- 



33 pf 



STObT- 



5eao • 



LS132 V^3 

3C 



STALL — HT^V 



5TATI 



■ CHIP SELECT 



WRITE ENBL 



ROM/IO 



A5 [S>- 



A4 f30>- 



A3 []T>- 



A2 Qii>- 



AI Ofl>- 



ADDR 
ADDR 1 

READ 
t/0 SELECT 



13 


A 1Y 

B I7j 

LS155 _ 

1Y 2 

DATAj 

sTb i 2 ~0 
9A jy 

DATA ? 2? 2 
stij 


7 


3 


6 




5 


1 




2 


9 




10 


15 


11 


14 









» ED*- 



PSYNC {?£>- 



e 




5 




n 




12 




l 


LS30 
?C 






2 




3 




4 









sTaTl- 



<33 pf 




173 






-[72> PROY 



LS08 A 6 5 j 4C^ ° "" "" 

— i!2 ' «.l 



2N3904 



MEMORY ■ 



PUR f7T>- 







MWRITE tH>" 



Jr> 



■55TTT 



P6T(97>- 

fRTsTr[?s>- 



-^4im>ojj 

l^LS04 



DISK JOCKEY 20 REVISION 4 

ROARtl SELECT LOGIC. ADDRESS BUffERS 



TAGl 1 Of S 
COPYRIGHT 1979 GEORGE MORROW 



1-AODR 
I-ADOR 1 
1-ADDR 2 
1-ADDR 3 
1-ADDR 4 
1-ADDR 5 
1-AODR 6 
1-ADDR 7 
1-ADDR 8 
1-AODR 9 
ROM SELECT 



5 


A 

A l 

A ? 

B426 
A 3 

A 4 

A 6 °1 
A ? 0, 

"8 °3 

A 9 °4 

B, rs 2 




6 




7 




4 




3 




2 




1 


14 


17 


13 


16 


12 


15 


11 


8 


10 







DATA 

5/vfFi 

DATA 2 

TO 



1-AODR 
1-ADDR 1 
1-AD0R 2 
1-AODR 3 
1-AODR 4 
1-ADDR 5 
1-ADDR 6 
1-ADDR 7 
l-ADDR 8 
1-ADDR 9 
1-R0H SELECT 



5 


A 
A l 

A 2 

B426 

*3 

*4 

8C 

A 5 

A 6 °I 
A 7 2 

A 8 °3 

Ag 0, 

cs, cs 2 




6 




7 




4 




3 




2 




1 


14 


17 


13 


16 


12 


15 


11 


8 


10 







DATA 4 
DATA 5 
DATA 6 
DATA 7 





5 












6 


A 
A l 
















7 


A, 
















4 


*3 


2114 














3 


*4 
















2 


A 5 
A 6 


IOC 








1 


I/O, 


14 














17 


A 7 


I/0 ? 


13 










DATA 1 




16 


A S 


I/o 3 


12 


_^__ 












15 


A 9 


i/o 4 


11 


___ 








DATA J 




8 


CS 

Se 










ID 

















5 










6 


A 
A l 










2114 








A 2 
A 3 








4 














3 


A 4 
A 5 
A 6 
A 7 








2 


9C 






I/O, 

i/o 2 


14 




17 


13 










16 


A 8 


i/o 3 


12 










15 


A 9 


i/o 4 


11 










8 


CS 

Be 








10 













DATA 4 



DO I |3?>- 



DO 1 gT>- 



00 2 (S[>- 



DO 3 [89>- 



DO 4 g>- 



DO 5 |I£>- 



00 6 [55>- 



D07 |T>- 



1-IrTte • 



IN 6 ^6 


7 




IN 5 0UT 5 


9 




!N ? 5DT 7 


5 




LS240 

I", 67JT 4 


12 




Iw 8 ^8 


3 




90 
IN 3 00T 3 


14 




IN, OUT, 


18 






16 



eWl a 



DATA 1 



TA 
DATA 1 
DATA 2 
OATA 3 



l-ITO 



tN 3 6TJT 3 



LS240 
IN, OUT, 



I«„ OUT. 



IN, OUT. 
A 



7 uu, 7 

ffiL, 



ENBL, 



-{55> DI 



-{£> 



-{4T> DI 2 



-{4?> DI 3 



-{5T> DI 4 



-f92> DI 5 



-|g> DI 6 



-{43> DI 7 



♦8 VOLTS fUST 



IN OUT 

7805 

GND 



J 



♦8 VOLTS (T3r>- 



T 
I 



IN OUT 

7805 



J 



DISK JOCKEY 20 REVISION 4 

RAH. ROM, AMD DATA BUFFERS 



- *i VOLTS power for 

1C.2C.3C,4C,5C.6C, 

7C,8C.9C,10C,11C 



RASE 2 OF 5 
COPYRIGHT 1979 GEORGE MORROW 



CONNECTOR J? 



Two" sided Qo>- 



3-imr rq 

3-OATA RQ 

HEAD 
*CC 



TndTx [20>- 



SEaTST QJ2>- 

CONIIECTOR J2 



1N 3 OlJTj 



12B 
IN, OUT, 



, ram 
ram 

. DATA 2 

■ DATA 3 

DATA 4 



OATA - 
DATA 1- 

&7ta"2- 



ram- 



'l "2 

LS174 



"3 "3 

13C 



iNj 5UT Z 



74368 
ISr OUT, 



13B 



-§?> TOO 



-gF> DRIVc 2 



-|3<r> DRIVE 3 



-|5r> DRIVE 4 
-§£> IN USE/SIDE SEL 



-f£> HEAD LOAD 




PUR OMP 1 1/ 'C ^ /~ 



B Q„ 

IS390 

A Q, 

1C C 

CLEAR 



ONE 
TWO 



LS08\8___ 
10 J 



-rcinjri 



DISABLE POWER-UP JUMP (OFF) 
ENABLE POWER-UP JUMP (ON) 

15 -«. 2 

SW1-7 



{33> A12 



g> A13 



{8eT> A14 



{5> A15 



-0?> A10 



-li (22> Ab61! KSl 



DISK JOCKEY 20 REVISION 4 

FUNCTION REG1STER.0RIVE SELECT S POWER-UP JUMP LOGIC 



PAGE 4 OF 5 
COPYRIGHT 1979 

GEORGE MORROW 



'cc 

12 »-^5 

t-O ^~-0 

SW2-4 



SU2-3 



10 - 



<W 



SIP3 



BRZ941 



I0 750 l/2w 

* if 



■ *5V 
• +5V 



V 



u 



< I — [2N3906 



CONNECTOR Jl 
RS232 IN [F> 



>' 



3.3k 



1N914 ' 



RS232 GNO E>- 



750 l/2w 



Y* IN £>- 



TTY* IN [T>- 



27k 
-V- 



27k 
— <S- 



=t= 1.5 mfd 



♦16 VOLTS [T>- 



IN OUT 

7812 

em 



J 



n.s nfd 



V 



BUT 4 "6 - 

ram - 

DTSTT5 ■ 
DW5 • 

ram • 

bATA 5 ■ 

Dim ■ 

DATA 7 ■ 



1-SERIAL IB ■ 
1-SERIAL OUT 
1-SERIAL STAT 



— iob>0 — 

l^LSM 



TR ? 
TR 8 
TRC 
RRC 
RRO 

BrB 

TBRL 
5FD 
RI 



15 -"----oL 

SW2-8 



15 - 
i K> 



14. 3 

SU2-6 



SIP3 
— f — 



'^IjlU 



13 -^4 5 1 : 



SES 

MR 





6 






RR 8 


5 




PE 


13 




0E 


15 




OR 

TBRE 


19 


22 




FE 


14 





DATA 

mm 

data"? 
DATA 5 

ram 
ram 
ram 

DATA 7 

DATA 
DATA 1 
DATA 2 
DATA 3 
DATA 4 



n, 




CONNECTOR Jl 

{~T> RS232 OUT 



240 . — . 
^ \jj> TTY OUT 



{?> TTY* OUT 



-16 VOLTS E>" 



IN OUT 
7912 



J 



-12V 

=$=1.8 mfd 



DISK JOCKEY 20 REVISION 4 
SERIAL INTERFACE LOGIC 
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Morrow Designs, Inc. 

Thinker 



Tbys 



5221 Central Avenue, Richmond, CA 94804 (415) 524-2101 

FIELD ENGINEERING MEMO 



TO: All DISCUS Owners and Dealers 

SUBJECT: Update for DISCUS Double Density Operating Systems 

FROM: George Morrow 

In a world of sel 1-and-forget, you may be gratified to learn that 
Morrow Designs sells and remembers. That's why we're offering an 
operating systems upgrade for all DISCUS Double Density Disk Drives. 
At cost. Or below. 

Here's why : We found an anomaly in Western Digital's 1791 Floppy Disk 
Controller chip. Nothing major. 



But under certain conditions, you could get an "error" from CP/h 
Operating System (BDOS ERROR - "BAD SECTOR"). When this happens, certain 
information on the disk is no longer readable. But it's software 
correctible. So, we're correcting it. At cost. Or below. 

Here's what you do : 

For the Double Density DISCUS Controller Model B 

a) If the 2708 EPROM has a label marked "B/V2", no action is required — 
you have the latest version of the driver software which corrects the 
1791 anomaly. 

b) If the 2708 EPROM has no label, it must be replaced or rep rog rammed: 
Send us a check for $15.00 or a 2708 EPROM which is erased and 
functional . 

For the Double Den sity DISCUS Controller REVs 0, 1, 3 and k r 

a) If you have 2.0, 2.1, or 2.2 CP/M, send us a clean diskette or your v g ," 
check for $7.00. We'll send back the latest 2.2 CP/M diskette. \l£/ k ^ 
(Remember to include the serial number with your reply.) ^/ r €»> 

f O 

b) If you have Lifeboat \.h CP/M, it's going to be a little more 
expensive. $*»2.00. For that we'll send you the latest version of 
CP/M 2.2 on a diskette and complete documentation for the upgrade. 
Or, if you send us a clean diskette, the cost is only $35-00. 
Normally, the cost of the documentation alone is $35-00. Again, 
we must have the serial number of your CP/M in order to make this 
upgrade. 



I C- 



NOTES ON LIFEBOAT 2D CP/M FOR THINKER TOYS 



There are several features of Lifeboat's 2D version of CP/M with 
which users accustomed to single density CP/M on 8 inch drives may 
not be familiar. These features will be explained below. 

ASSIGNING DENSITY 

2D CP/M must be aware of the density of a diskette before it 
can successfully perform a read or write operation. The command 
file "DENSITY" allows the user to inform CP/M of the density which 
a given drive will be assigned. If a wrong density diskette is 
placed in a drive, and that drive is subsequently accessed, the 
system will fall into an irrecoverable error. 

The default assignment of densities in the production CP/M_disk 
is: A, C, and D drives = Double Density; B drive = Single Density 

To change this arrangement temporarily, type DENSITY and follow 
the prompts! To make a permanent change, follow the instructions 
contained in the "ASM" file TTUSER. 

FORMATTING A DISKETTE 

The two command programs, F0RMAT1D and F0RMAT2D will format a 
diskette in single and dual density respectively. F0RMAT1D will 
write sector headers for 26 sectors per track, 128 bytes per sector. 
F0RMAT2D will write sector headers for 26 sectors per track, 256 
bytes per sector. A disk can be formatted in either density 
regardless of the density assigned to the formatting drive under 
CP/M— however the drive will not be able to read the disk it has 
just formatted unless the drive has been assigned the proper density. 

USER and TTUSER 

2D CP/M dedicates the equivalent of three single density sectors, 
or one and a half pages of memory, for user I/O. In single density 
?P/M this was subsumed under the CBIOS. In a 24K system, locations 



half pages of memory, for user I/O. In single density 

_ ___ 3 subsumed under t 

5E80 to 5FFF contain user I/O. 

To alter CP/M size or change the I/O routines or both from the 
original production configuration, the USER or TTUSER f lie »us be 
edited to reflect the desired changes and re-assembled to create a 
HEX file of the new I/O. The active I/O on production diskettes was 
assembled from the file called TTUSER, while a simpler file called 
USER provides an alternative specimen which does not implement I/O 
byte . 



Both source files are amply commented. It should be noted that 
to retain the file TTUSER as the actual I/O driver after a MOVCPM 
command, only the EQUATE labeled "MSIZE" need be changed in the 
edit prior to re-assembly. However, after re-assembly, the PRN file 
of TTUSER should be examined in order to find the new "OFFSET" variable 
which will be needed in order to overlay the driver onto the new 
CP/M system. 

A simple MOVCPM N command will create a new CP/M of "N" K size 
with only the console driver implemented. Thus no overlay isnecessary 
if the only device CP/M is to be aware of is the console terminal. 

RECONFIGURING A SYSTEM 

Once the USER or TTUSER file has been edited and re-assembled, the 
following procedure may used to incorporate the new drivers into CP/M: 

-Note the OFFSET of the new CP/M from the PRN file of USER or TTUSER. 

-Type "MOVCPM N *" , where N represents the memory size in. kilobytes . 
The smallest CP/M size is 17K. 

-Type "SAVE 35 CPMN.COM", with N as above. 
-Type "DDT CPMN.COM", with N as above. 
-Type "IUSER.HEX", or " ITTUSER. HEX" 

-Type "ROFFSET", where OFFSET is the value obtained from the PRN 
file USER or TTUSER. For a 24K system, one would type "RC380; for a 32K 
system, RA380 etc. ;„-^5*0 " i ?£ 

-Type control C 

-Type "SYSGEN" ; CP/M will request for the source drive. 

-Type Return; the source for the new system is already in memory. 

-Type the destination drive— A,B,C or D. Make sure that the drive 
in question has a disk formatted in the proper density. 

-Reset the system and boot the new disk. 

SAVEUSER 

The SAVEUSER command places whatever I/O that happens to be in memory 
onto the CP/M boot program. Thus new I/O drivers can be patched in from 
a front panel or monitor, and made permanent through the SAVEUSER command. 
A subsequent MOVCPM command will overwrite this patch, so once a driver 
has been tested it should be incorporated into a USER source file as soon 
as possible. The memory locations to patch in I/O drivers can be found 
in the listing of TTUSER included with the CP/M diskette. 

AUT0.COM 

The AUT0.COM function does not work at this time. 
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0018 
2000 
4600 
4E00 
5B00 
5E80 
C380 



********************************************************* 

SAMPLE USER AREA 

FOR THINKER TOYS 2D CONTROLLER AMD SWITCHBOARD 
********'***************************************************- 

THIS DRIVER IMPLEMENTS I/O BYTE 
THE CONSOLE DEVICE IS AN RS232 OR TTY TERMINAL 
ATTACHED TO THE I/O CONNECTOR OF THE DJ2D BOARD 
THE LIST DEVICE IS AN RS232 OR TTY PRINTER 
ATTACHED TO THE SECOND SERIAL PORT ON THE SWITCHBOARD 

THESE ROUTINES CAN BE USED AS A BASIS 
FOR THE DEVELOPMENT OF YOUR OWN I/O 

NOTE ALSO LOCATIONS OF WHERE TO SET THE 
DENSITY ON EACH DRIVE AND SETTING OF THE MODE BYTE 
WHICH CAN RUN A FILE NAMED "AUTO.COM" ON EITHER 
COLD OR WARM BOOT. 

FOR EXAMPLE, RENAME BASIC.COM TO AUT0.COM 
USING THE COMMAND "REN AUTO . COM=BASIC .COM" AND 
HAVE BASIC AUTOMATICALLY ACTIVATED ON EACH COLD BOOT. 

********************************************************* 

SYSTEM EQUATES 
********************************************************* 



MSIZE 


EQU 


BIAS 


EQU 


CPMB 


EQU 


BDOS 


EQU 


BIOS 


EQU 


USER 


EQU 


OFFSET 


EQU 



24 

(MSIZE-16)*1024 

2600H+BIAS 

2E00H+BIAS 

3B00H+BIAS 

BIOS+380H 

1E80H-BIOS 



;CP/M SYSTEM SIZE IN KBYTES 



r LOCATION 

LOCATION 

: LOCATION 

•START OF 

TO SYSGEN 



OF 
OF 
OF 



CCP 
BDOS 
BIOS 
USER AREA 
IMAGE 



********************************************************* 

DISK PARAMETERS - DOUBLE DENSITY DISK JOCKEY 
********************************************************* 

ON DISK IN SYSGEN IN 24K SYSTEN 

TRACK SECTOR ADDRESS 

BOOT 1 900H 

CCP 1 1 0980H 

BDOS 1 17 1180H 

BIOS 1 43 1E80H 

MODE 1 49 21FFH 

USER 1 50-52 2200H 



TOP OF SYSTEM 



237FH 



0E700H 

4600H 

4E00H 

5B00H 

5E7FH 

5E80H 

5FFFH 



DOUBLE DENSITY SKIP TABLE 

1,2,19,20,37,38,3,4,21,22,39,40,5,6,2 3,24,41,42 

7,8,25,26,43,44,9,10,27,28,45,46,11,12,29,30,47,48 

13,14,31,32,49,50,15,16,33,34,51,52,17,18,35,36 

********************************************************* 

MODE BYTE OPTIONS AND DENSITY SETTINGS OF VARIOUS DRIVES 
********************************************************* 



;5E78H IN 24K SYSTEM 
; DRIVE B SD, OTHERS DD 
0=SNGL, 1=DBL 
; RESERVED 



5E78 






ORG 


USER-8 


5E78 


01000101 


DNSTY: 


DB 


1,0,1,1 
;B0=DENSITY 


5E7C 


000000 




DB 


0,0,0 



5E7F 00 



5E80 



MODE: DB ;MODE BYTE 

;BIT0=1 DOES AUTO ON COLD BOOT 
;BIT1=1 DOES AUTO ON WARM BOOT 

********************************************************* 

* SAMPLE USER AREA 
********************************************************* 

ORG USER ;5E80H IN DIST SYSTEM 

******************************************************* 

* JUMP TABLE - JMPS MUST REMAIN HERE, IN SAME ORDER 
******************************************************* 



5E80 C33C5F 




JMP 


5E83 C3985E 




JMP 


5E86 C3A45E 




JMP 


5E89 C3B65E 




JMP 


5E8C C3D15E 




JMP 


5E8F C3C65E 




JMP 


5E92 C3BC5E 




JMP 


5E95 C3335F 




JMP 


0004 = 


CDISK 


EQU 


0003 = 


IOBYTE 


EQU 



0000 = 



INIT 

CONST 

CON IN 

CONOUT 

LIST 

PUNCH 

READER ;READER INPUT 

PRST ; PRINTER STATUS 



INITIALIZATION 
CONSOLE STATUS 
CONSOLE INPUT 
CONSOLE OUTPUT 
LIST OUTPUT - 
PUNCH OUTPUT 



4 
3H 



.•current disk storage location 
;iobyte storage location 



************************************************************ 

* 



* 
* 
* 
* 
* 
* 
* 
* 
* 



* Iobyte allows selection of different I/O devices. It 

* can be initialized in any way by changing the equate 

* bellow. 

* Initial iobyte is currently defined as : 

* console = tty 

* reader = tty 

* punch = tty 

* list = tty 
* 
************************************************************ 

INTIOBY EQU ; initial iobyte, 

************************************************************ 

* * 

* * 

* The following equates reference the disk jockey/2d * 

* controller board. If your controller is non-standard * 

* then all the equates can be changed by re-assigning the * 

* value of ORIGIN to be the starting address of your * 

* controller. * 

* * 
************************************************************ 



E000 
E003 
E006 
E021 
000D 
000A 
E006 
E003 



ORIGIN EQU 

INPUT EQU 

OUTPUT EQU 

TSTAT EQU 

ACR EQU 

ALF EQU 

COTTY EQU 

CITTY EQU 



0E000H ;disk jockey/2d beginning address 
ORIGIN+3 ;serial input routine 
ORIGIN+6 ;serial output routine 
ORIGIN+21H ;serial device status routine 
0DH ;carriage return 
0AH ;line feed 
OUTPUT ;default character output 
INPUT ;default character input 



************************************************************ 

* 



* const: get the status for the currently assigned console * 

* device. The console device can be gotten from * 

* iobyte, then a jump to the correct console status * 

* routine is performed. * 

* * 
************************************************************ 



5E98 21045F 
5E9B C3A75E 



CONST LXI H,CSTBLE /beginning of jump table 
JMP C0NIN1 ;select corre jump 



************************************************************ 

* * 

* csreader: if the console is assigned to the reader then * 

* a jump will be made here, where another jump * 

* will occur to the correct reader status. * 

* * 
************************************************************ 



5E9E 210C5F 
5EA1 C3BF5E 



CSREADR LXI 
JMP 



H,CSRTBLE 
READERA 



/beginning of reader status tal 



************************************************************ 

* * 

* conin: take the correct jump for the console input * 

* routine. The jump is based on the two least sig- * 

* nificant bits of iobyte. * 

* * 
************************************************************ 



5EA4 21DC5E 



CONIN LXI 



H,CITBLE 



/beginning of character input t 



* entry at coninl will decode the two least significant bits 

* of iobyte. This is used by conin,conout, and const. 
* 



5EA7 3A0300 
5EAA 17 



C0NIN1 LDA 
RAL 



IOBYTE 



* entry at seldev will form an offset into the table pointed 

* to by H&L and then pick up the address and jump there. 
* 



/strip off unwanted bits 
/form affset 

/add offset 

/pick up high byte 

/pick up low byte 
/form address 
/go there ! 

************************************************************ 



5EAB E606 SELDEV ANI 


6H 


5EAD 1600 


MVI 


D,0 


5EAF 5F 


MOV 


E,A 


5EB0 19 


DAD 


D 


5EB1 7E 


MOV 


A,M 


5EB2 23 


INX 


H 


5EB3 66 


MOV 


H,M 


5EB4 6F 


MOV 


L,A 


5EB5 E9 


PCHL 





* conout: take the proper branch address based on the two * 

* least significant bits of iobyte. * 

* * 
************************************************************ 



5EB6 21B45E 
5EB9 C3A75E 



CONOUT LXI 
JMP 



H,COTBLE ;beginning of the character out tabl 
C0NIN1 ;do the decode 



************************************************************ 

* * 

* reader: select the correct reader device for input. The * 

* reader is selected from bits 2 and 3 of iobyte. * 

* * 

************************************************************ 



5EBC 21FC5E 



READER LXI 



H,RTBLE ; beg inning of reader input table 



* entry at readera will decode bits 2 & 3 of iobyte, used 

* by csreader. 



5EBF 3A0300 READERA LDA 



IOBYTE 



5EC2 IF 
5EC3 C3AB5E 



* entry at readerl will shift the bits into position, used 

* by list and punch. 



READR1 RAR 
JMP 



SELDEV 



************************************************************ 

* * 

* punch: select the correct punch device. The seection * 

* comes from bits 4&5 of iobyte. * 

* * 
************************************************************ 



5EC6 21F45E 
5EC9 3A0300 



PUNCH LXI H,PTBLE ;beginning of punch table 
LDA IOBYTE 



5ECC IF 
5ECD IF 
5ECE C3C25E 



* entry at pnchl rotates bits a little more in prep for 

* seldev, used by list. 
* 



PNC HI RAR 
RAR 
JMP 



READR1 



************************************************************ 

* * 

* list: select a list device based on bits 6&7 of iobyte * 

* * 
************************************************************ 



5ED1 21EC5E 

5ED4 3A0300 

5ED7 IF 

5ED8 IF 

5ED9 C3CC5E 



LIST LXI H,LTBLE ;beginning of the list device routines 
LDA IOBYTE 
RAR 
RAR 
JMP PNCH1 

************************************************************ 

* * 

* If customizing I/O routines is being performed, the * 

* table below should be modified to reflect the changes. * 

* all I/O devices are decoded out of iobvte and the iump * 



************************************************************ 

* 
* 

* If customizing I/O routines is being performed, the * 

* table below should be modified to reflect the changes. * 

* all I/O devices are decoded out of iobyte and the jump * 

* is taken from the following tables. 
* 
************************************************************ 



* console input table 



5EDC 03E0 


CITBLE 


DW 


CITTY 


5EDE 1F5F 




DW 


CICRT 


5EE0 BC5E 




DW 


READER 


5EE2 1F5F 




DW 


CIUC1 



•input from tty (currently assigned by intioby , input from 2d) 

; input from crt (currently SWITCHBOARD serial port 1) 

';input from reader (depends on reader selection) 

; input from user console 1 (currently SWITCHBOARD serial port 1) 



5EE4 06E0 
5EE6 145F 
5EE8 D15E 
5EEA 145F 



* console output table 
* 



COTBLE DW 
DW 
DW 
DW 



COTTY 
COCRT 
LIST 
C0UC1 



;output to tty (currently assigned by intioby , output to 2d) 

;output to crt (currently SWITCHBOARD serial port 1) 

;output to list device (depends on bits 6&7 of iobyte) 

;output to user console 1 (currently SWITCHBOARD serial port 1) 



* list device table 
* 



5EEC 
5EEE 
5EF0 
5EF2 


06E0 
145F 
145F 
145F 


LTBLE 


DW 
DW 
DW 
DW 


COTTY 
COCRT 
COLPT 
COULl 






* 

* punch 
* 


device 


table 


5EF4 
5EF6 
5EF8 
5EFA 


06E0 
145F 
145F 
145F 


PTBLE 


DW 
DW 
DW 
DW 


COTTY 
COPTP 
C0UP1 
C0UP2 



;output to tty (currently assigned by intioby , output to 2d) 

;output to crt (currently SWITCHBOARD serial port 1) 

; output to line printer (currently SWITCHBOARD serial port 1) 

•output to user line printer 1 (currently SWITCHBOARD serial po 



rt i: 



•output to the tty (currently assigned by intioby, output to 2d) 

;output to paper tape punch (currently SWITCHBOARD serial port 1) 

•output to user punch 1 (currently SWITCHBOARD serial port 1) 

;output to user punch 2 (currntlly SWITCHBOARD serial port 1) 



* reader device input table 



* reader device input table 
* 



5EFC 


03E0 


RTBLE 


DW 


CITTY 


5EFE 


1F5F 




DW 


CIPTR 


5F00 


1F5F 




DW 


CIUR1 


5F02 


1F5F 




DW 


CIUR2 






* 

* conso 
* 


le status table 


5F04 


2B5F 


CSTBLE 


DW 


CSTTY 


5F06 


335F 




DW 


CSCRT 


5F08 


9E5E 




DW 


CSREAD 


5F0A 


335F 




DW 


CSUC1 



; input from tty (currently assigned by intioby, input from 2d) 

; input from paper tape reader (currently SWITCHBOARD serial port 

; input from user reader 1 (currently SWITCHBOARD serial port 1) 

; input from user reader 2 (currently SWITCHBOARD serial port 1) 



D 



;status of tty (currently assigned by intioby, ststus from 2d) 

;status from crt (currently SWITCHBOARD serial port 1) 

;status from reader (depends on reader device ) 

•status from user console 1 (currently SWITCHBOARD serial port 1) 



5F0C 2B5F 
5F0E 335F 
5F10 335F 
5F12 335F 



* status fromreader device 
* 

CSRTBLE DW CSTTY ;status from tty (currently assigned by intioby, status of 2d) 

DW CSPTR ;status from paper tape reader (currently SWITCHBOARD serial port 1) 

DW CSUR1 /status from user reader 1 (currently SWITCHBOARD serial port 1) 

DW CSUR2 ;status of user reader 2 (currently SWITCHBOARD serial port 1) 

************************************************************ 

* * 

* The following equates set output device to output to * 

* the SWITCHBOARD serial port 1. * 

* * 
************************************************************ 



5F14 


= 


COCRT 


EQU 


$ i 


output from crt 


5F14 


= 


C0UC1 


EQU 


$ 


output from user console 1 


5F14 


= 


C0UL1 


EQU 


$ 


output from user line printer 1 


5F14 


= 


COPTP 


EQU 


$ 


output from paper tape punch 


5F14 


= 


C0UP1 


EQU 


$ 


output from user punch 1 


5F14 


= 


C0UP2 


EQU 


$ 


•output from user punch 2 


5F14 


DB02 


COLPT 


IN 


2 


^output from line printer, get status 


5F16 


E680 




AN I 


80H 


;wait until ok to send 


5F18 


CA145F 




JZ 


COLPT 




5F1B 


79 




MOV 


A,C 


joutput the character 


5F1C 


D301 




OUT 


1 




5F1E 


C9 




RET 







************************************************************ 



* The following equates set the input from the devices to * 

* come from the SWITCHBOARD serial port 1 * 



** ******************************* «««»»**»»*«»»**»««»*«». A * X» 
* * 

* The. following equates set the input from the devices to * 

* come from the SWITCHBOARD serial port 1 * 

* * 
************************************************************ 



5F1F = 


CIUC1 


EQU 


$ 


5F1F = 


CICRT 


EQU 


$ 


5F1F = 


CIUR1 


EQU 


$ 


5F1F = 


CIUR2 


EQU 


$ 


5F1F DB02 


CIPTR 


IN 


2 


5F21 E640 




AN I 


40H 


5F23 CA1F5F 




JZ 


CIPTR 


5F26 DB01 




IN 


1 


5F28 E67F 




AN I 


7FH 


5F2A C9 




RET 





; input from user console 1 

; input from crt 

; input from user reader 1 

; input from user reader 2 

; input from paper tape reader, get status 

;wait for character 



;strip off the parity 



************************************************************ 

* * 

* console status routines, test if a character has arrived * 

* * 
************************************************************ 



5F2B 


CD21E0 


CSTTY 


5F2E 


3E00 


STAT 


5F30 


C0 




5F31 


3D 




5F32 


C9 





CALL TSTAT ;status from disk jockey 2d 

MVI A,0 ;prep for zero return 

RNZ ;nothing found 

DCR A ; return with 0FFH 

RET 



************************************************************ 

* * 

* The following equates cause the devices to get status * 

* from the SWITCHBOARD serial port 1. * 

* * 
************************************************************ 



; STATUS OF PRINTER 
;status of user reader 1 
;status of user reader 2 
;status of paper tape reader 
;status of user console 1 
; status from crt, get status 
;strip of data ready bit 
;make correct polarity 
;return proper indication 

*********************************************************** 

* * 

* THE FOLLOWING IS A TERMINAL INITIALIZATION ROUTINE. * 

* IT CAN BE USED TO PERFORM ANY INITIALIZATION YOU MAY * 

* REQUIRE. CURRENTLY IT IS NOT NEEDED. * 

* * 
*********************************************************** 



5F33 


= 


PRST 


EQU 


$ 


5F33 


= 


CSUR1 


EQU 


$ 


5F33 


= 


CSUR2 


EQU 


$ 


5F33 


= 


CSPTR 


EQU 


$ 


5F33 


= 


CSUC1 


EQU 


$ 


5F33 


DB02 


CSCRT 


IN 


2 


5F35 


E640 




AN I 


40H 


5F37 


EE40 




XRI 


40H 


5F39 


C32E5F 




JMP 


STAT 



5F3C = 

5F3C 3E00 

5F3E 320300 

5F41 C9 



INIT 



EQU 
MVI 
STA 
RET 



A,INTIOBY 
IOBYTE 



A> 



